home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 36 / Amiga Format CD36 (1999-01-22)(Future Publishing)(GB)[!][issue 1999-02].iso / -seriously_amiga- / -commercial- / golded5_demo / install < prev    next >
Windows Autorun File  |  1998-11-30  |  121KB  |  3,665 lines
  1. ; $VER: GoldED Studio 5.0.0 (22.11.98)
  2.  
  3. (delopts "oknodelete" "force" "askuser")
  4.  
  5. ; -------------------------------- set constants -------------------------------
  6.  
  7. (set @studio_found                   1  )
  8. (set @studio_missing                 0  )
  9.  
  10. (set @studio_installtype_minimum     0  )
  11. (set @studio_installtype_user        1  )
  12. (set @studio_installtype_normal      2  )
  13.  
  14. (set @studio_components_golded       1  )
  15. (set @studio_components_starter      2  )
  16. (set @studio_components_docs         4  )
  17. (set @studio_components_addons       8  )
  18. (set @studio_components_developer    16 )
  19. (set @studio_components_screenshot   32 )
  20. (set @studio_components_recover      64 )
  21. (set @studio_components_config       128)
  22. (set @studio_components_all          255)
  23.  
  24. (set @studio_preset_display          1  )
  25. (set @studio_preset_interface        2  )
  26. (set @studio_preset_hunter           4  )
  27. (set @studio_preset_printer          8  )
  28. (set @studio_preset_context          16 )
  29. (set @studio_preset_syntax           32 )
  30. (set @studio_preset_layout           64 )
  31. (set @studio_preset_mouse            128)
  32. (set @studio_preset_menu             256)
  33.  
  34. (set @studio_preset_api              1  )
  35. (set @studio_preset_project          2  )
  36. (set @studio_preset_references       4  )
  37. (set @studio_preset_gadgets          8  )
  38. (set @studio_preset_tabs             16 )
  39. (set @studio_preset_keyboard         32 )
  40. (set @studio_preset_templates        64 )
  41. (set @studio_preset_misc             128)
  42. (set @studio_preset_dictionary       256)
  43.  
  44. (set @studio_cpu_68000               0  )
  45. (set @studio_cpu_68020               1  )
  46. (set @studio_cpu_68030               2  )
  47. (set @studio_cpu_68040               3  )
  48. (set @studio_cpu_68060               4  )
  49.  
  50. (set @studio_addons_envwww           1  )
  51. (set @studio_addons_envgde           2  )
  52. (set @studio_addons_envthe           4  )
  53. (set @studio_addons_envcpp           8  )
  54. (set @studio_addons_envstm           16 )
  55. (set @studio_addons_envsas           32 )
  56.  
  57. (set @studio_addons_envasm           1  )
  58. (set @studio_addons_envbat           2  )
  59. (set @studio_addons_envfax           4  )
  60. (set @studio_addons_envmdt           8  )
  61. (set @studio_addons_envthr           16 )
  62. (set @studio_addons_envjcy           32 )
  63.  
  64. (set @studio_addons_envprt           1  )
  65. (set @studio_addons_envrcs           2  )
  66. (set @studio_addons_envins           4  )
  67.  
  68. (set @updatemode_reinstall           0  )
  69. (set @updatemode_add                 1  )
  70. (set @updatemode_remove              2  )
  71. (set @updatemode_presets             3  )
  72. (set @updatemode_registry            4  )
  73. (set @updatemode_startup             5  )
  74. (set @updatemode_exit                6  )
  75.  
  76. (set @studio_starter_ed              1  )
  77. (set @studio_starter_appicon         2  )
  78.  
  79. (set @studio_manual_history          1  )
  80. (set @studio_manual_licence          2  )
  81. (set @studio_manual_order            4  )
  82. (set @studio_manual_english          8  )
  83. (set @studio_manual_german           16 )
  84.  
  85. ; -------------------------------- set variables -------------------------------
  86.  
  87. (set studio_found         @studio_missing)
  88. (set studio_updatemode    @updatemode_components)
  89. (set studio_registered    0)
  90. (set studio_yourname     "")
  91. (set studio_serial       "0")
  92. (set studio_path         "")
  93. (set studio_update       "")
  94. (set studio_language     "")
  95. (set studio_regedit      "")
  96. (set studio_components    0)
  97. (set studio_starter       0)
  98. (set studio_manual        0)
  99. (set studio_addons_a      0)
  100. (set studio_addons_b      0)
  101. (set studio_addons_c      0)
  102. (set studio_reboot        0)
  103.  
  104. ; -------------------------------- set strings ---------------------------------
  105.  
  106. (if (= @language "deutsch")
  107.  
  108.     (
  109.         (set #studio_reboot "Bitte starten Sie den Rechner nach der Installation neu !")
  110.  
  111.         (set #studio_rexxerr
  112.  
  113.             (cat
  114.  
  115.                 "Warnung: Die ARexx-Installation ist unvollständig.  \n"
  116.                 "Die folgende Datei konnte nicht gefunden werden:    \n"
  117.                 "                                                    \n"
  118.             )
  119.         )
  120.  
  121.         (set #studio_overwrite
  122.  
  123.             (cat
  124.  
  125.                 "An dieser Stelle existiert schon ein Verzeichnis mit\n"
  126.                 "dem Namen Studio ! Soll mit der Indstallation in    \n"
  127.                 "dieses Verzeichnis fortgefahren werden ?            \n"
  128.             )
  129.         )
  130.  
  131.         (set #studio_overwrite_help
  132.  
  133.             (cat
  134.  
  135.                 "Möglicherweise gehört dieses Verzeichnis zu einem   \n"
  136.                 "anderen Programm oder einer älteren unvollständigen \n"
  137.                 "Installation.                                       \n"
  138.             )
  139.         )
  140.  
  141.         (set #studio_overwrite_install "Installieren")
  142.  
  143.         (set #studio_overwrite_cancel  "Anderes Verzeichnis wählen")
  144.  
  145.         (set #studio_badkick "Dieses Programm benötigt AmigaOS 3 !")
  146.  
  147.         (set #studio_notify
  148.  
  149.             (cat
  150.  
  151.                 "Während der letzten Installation ist ein Fehler     \n"
  152.                 "aufgetreten. Wir empfehlen die Wiederholung einer   \n"
  153.                 "Minimalinstallation in ein neues Verzeichnis.       \n"
  154.                 "                                                    \n"
  155.                 "Beenden sie bitte vor der erneuten Installation alle\n"
  156.                 "anderen laufenden Programme !                       \n"
  157.             )
  158.         )
  159.  
  160.         (set #studio_welcome
  161.  
  162.             (cat
  163.  
  164.                 "Willkommen beim GoldED Studio 5 Demo Setup !        \n"
  165.                 "                                                    \n"
  166.                 "Mit diesem Programm wird GoldED Studio auf Ihrem    \n"
  167.                 "Computer installiert oder aktualisiert.             \n"
  168.                 "                                                    \n"
  169.                 "Es wird dringend empfohlen, alle anderen Programme  \n"
  170.                 "zu beenden, bevor Sie mit dem Setup fortfahren.     \n"
  171.                 "                                                    \n"
  172.                 "WARNUNG: Diese Software ist durch das nationale und \n"
  173.                 "internationale Urheberrecht geschützt. Unerlaubter  \n"
  174.                 "Vertrieb oder Verleih der Software oder einer ihrer \n"
  175.                 "Komponenten wird verfolgt.                          \n"
  176.             )
  177.         )
  178.  
  179.         (set #studio_installerr
  180.  
  181.             (cat
  182.  
  183.                 "Während der Installation ist ein Fehler aufgetraten.\n"
  184.                 "Eine Beschreibung der Fehlerursache finden Sie in   \n"
  185.                 "der Log-Datei im T:-Verzeichnis, sofern Sie zu      \n"
  186.                 "Beginn der Installation die Option LOGDATEI ERZEUGEN\n"
  187.                 "gewählt haben. Der Fehlercode ist:                  \n"
  188.                 "                                                    \n"
  189.             )
  190.         )
  191.  
  192.         (set #studio_yourname "Geben Sie Ihren Namen ein:")
  193.  
  194.         (set #studio_yourname_help
  195.  
  196.             (cat
  197.  
  198.                 "Die Eingabe des Namens ist zur Produktregistrierung \n"
  199.                 "erforderlich. Ohne Registrierung können Sie diese   \n"
  200.                 "Software nicht installieren.                        \n"
  201.             )
  202.         )
  203.  
  204.         (set #studio_check
  205.  
  206.             (cat
  207.  
  208.                 "Ist diese Angabe korrekt ?                          \n"
  209.                 "                                                    \n"
  210.                 "%s"
  211.             )
  212.         )
  213.  
  214.         (set #studio_check_continue "Korrekt")
  215.  
  216.         (set #studio_check_repeat "Eingabe wiederholen")
  217.  
  218.         (set #studio_found
  219.  
  220.             (cat
  221.  
  222.                 "Das Programm wurde schon einmal installiert:        \n"
  223.                 "                                                    \n"
  224.                 "Wählen Sie AKTUALISIEREN, um Komponenten            \n"
  225.                 "hinzuzufügen oder zu entfernen.                     \n"
  226.                 "                                                    \n"
  227.                 "Wählen Sie ANDERES VERZEICHNIS, um die Installation \n"
  228.                 "an anderer Stelle zu wiederholen.                   \n"
  229.             )
  230.         )
  231.  
  232.         (set #studio_found_help
  233.  
  234.             (cat
  235.  
  236.                 "AKTUALISIEREN                                       \n"
  237.                 "                                                    \n"
  238.                 "Ändert die vorhandene Installation. Dort vorhandne  \n"
  239.                 "Komponenten werden im weiteren Verlauf dieser       \n"
  240.                 "Installation aktualisiert.                          \n"
  241.                 "                                                    \n"
  242.                 "ANDERES VERZEICHNIS                                 \n"
  243.                 "                                                    \n"
  244.                 "Die Installation erfolgt in ein anderes Verzeichnis.\n"
  245.                 "Eine vorhandene Installation an anderer Stelle      \n"
  246.                 "bleibt erhalten. Sie sollten von dieser Möglichkeit \n"
  247.                 "nur Gebrauch machen, wenn mit der vorhandenen       \n"
  248.                 "Installation Probleme auftauchen, die eine          \n"
  249.                 "Aktualisierung nicht ratsam erscheinen lassen.      \n"
  250.             )
  251.         )
  252.  
  253.         (set #studio_found_confirm "Aktualisieren")
  254.  
  255.         (set #studio_found_newinstall "Anderes Verzeichnis")
  256.  
  257.         (set #studio_path_choose
  258.  
  259.             (cat
  260.  
  261.                 "Wählen Sie einen Pfad für die Installation. In dem  \n"
  262.                 "gewählten Pfad wird ein Verzeichnis für GoldED      \n"
  263.                 "Studio erzeugt:                                     \n"
  264.             )
  265.         )
  266.  
  267.         (set #studio_path_choose_help
  268.  
  269.             (cat
  270.  
  271.                 "Der Speicherplatzbedarf auf dem gewählten Medium    \n"
  272.                 "hängt von dem weiteren Installationsablauf ab.      \n"
  273.                 "Maximal werden 30 MB Speicherplatz benötigt.        \n"
  274.                 "                                                    \n"
  275.                 "Die Installation über eine vorhandene GoldED 3 oder \n"
  276.                 "GoldED 4 Installation ist nicht möglich. Die alten  \n"
  277.                 "Einstellungen können aber später übernommen werden, \n"
  278.                 "da Studio 5.0 abwärtskompatibel zu diesen           \n"
  279.                 "Programmversionen ist.                              \n"
  280.             )
  281.         )
  282.  
  283.         (set #studio_installtype "Wählen Sie die gewünschte Installationsart:")
  284.  
  285.         (set #studio_installtype_help
  286.  
  287.             (cat
  288.  
  289.                 "Sie können später jederzeit einzelen Komponeten     \n"
  290.                 "nachinstallieren oder installierte Komponenten      \n"
  291.                 "entfernen, indem Sie das Setup-Programm erneut      \n"
  292.                 "ausführen.                                          \n"
  293.             )
  294.         )
  295.  
  296.         (set #studio_installtype_minimum "Minimalinstallation (500 KB)")
  297.         (set #studio_installtype_user    "Benutzerdefiniert (bis zu 3.7 MB)")
  298.         (set #studio_installtype_normal  "Typische Installation (2 MB)")
  299.  
  300.         (set #studio_checking "Überprüfen der vorhandenen Installation ...")
  301.  
  302.         (set #studio_updatemode_reinstall "Installation aktualisieren")
  303.         (set #studio_updatemode_add       "Komponenten hinzufügen")
  304.         (set #studio_updatemode_remove    "Komponenten entfernen")
  305.         (set #studio_updatemode_presets   "Grundeinstellungen installieren")
  306.         (set #studio_updatemode_registry  "Registry wiederherstellen")
  307.         (set #studio_updatemode_startup   "User-Startup korrigieren")
  308.         (set #studio_updatemode_exit      "Setup beenden")
  309.  
  310.         (set #studio_updatemode_help
  311.  
  312.             (cat
  313.  
  314.                 "INSTALLATION AKTUALISIEREN                          \n"
  315.                 "                                                    \n"
  316.                 "Die bisher installierten Komponenten (mit Ausnahme  \n"
  317.                 "der Grundseinstellungen) werden neu installiert.    \n"
  318.                 "                                                    \n"
  319.                 "KOMPONENTEN HINZUFÜGEN/ENTFERNEN                    \n"
  320.                 "                                                    \n"
  321.                 "Ändert die vorhandene Installation durch Hinzufügen \n"
  322.                 "oder Entfernen einzelner Komponenten (Add-Ons,      \n"
  323.                 "Dokumentationen, usw.).                             \n"
  324.                 "                                                    \n"
  325.                 "GRUNDEINSTELLUNGEN INSTALLIEREN                     \n"
  326.                 "                                                    \n"
  327.                 "Erlaubt die selektive Installation von Einstellungen\n"
  328.                 "(Menu, Farben, usw.). Der Editor verwendet die      \n"
  329.                 "Grundeinstellungen, wenn normale Texte bearbeitet   \n"
  330.                 "werden, für die kein besonderer Dateityp definiert  \n"
  331.                 "wurde.                                              \n"
  332.                 "                                                    \n"
  333.                 "REGISTRY WIEDERHERSTELLEN                           \n"
  334.                 "                                                    \n"
  335.                 "Stellt die zentrale Konfigurationsdatei wieder her. \n"
  336.                 "Sie verlieren dadurch alle globalen Einstellungen im\n"
  337.                 "Editor sowie weiterhin alle Dateitypen mit Ausnahme \n"
  338.                 "des Dateityps TEXT !                                \n"
  339.                 "                                                    \n"
  340.                 "USER-STARTUP KORRIGIEREN                            \n"
  341.                 "                                                    \n"
  342.                 "Es wird der notwendige Assign auf das Verzeichnis   \n"
  343.                 "des Editors eingerichtet.                           \n"
  344.             )
  345.  
  346.         )
  347.  
  348.         (set #studio_components_install
  349.  
  350.             (cat
  351.  
  352.                 "Wählen Sie die Komponentengruppen, die installiert  \n"
  353.                 "werden sollen:                                      \n"
  354.             )
  355.         )
  356.  
  357.         (set #studio_components_update
  358.  
  359.             (cat
  360.  
  361.                 "Wählen Sie die Komponentengruppen, die installiert  \n"
  362.                 "bzw. aktualisiert werden sollen:                    \n"
  363.             )
  364.         )
  365.  
  366.         (set #studio_components_remove
  367.  
  368.             (cat
  369.  
  370.                 "Wählen Sie die Komponentengruppen, die ganz oder    \n"
  371.                 "teilweise entfernt werden sollen:                   \n"
  372.             )
  373.         )
  374.  
  375.         (set #studio_components_help
  376.  
  377.             (cat
  378.  
  379.                 "GOLDED (1.76 MB)                                    \n"
  380.                 "                                                    \n"
  381.                 "Der Editor GoldED sowie die unmittelbar vom Editor  \n"
  382.                 "benötigten Dateien und Verzeichnisse.               \n"
  383.                 "                                                    \n"
  384.                 "STARTER (0 - 15 KB)                                 \n"
  385.                 "                                                    \n"
  386.                 "Startprogramme, die die Verwendung des Editors      \n"
  387.                 "vereinfachen (Drag & Drop).                         \n"
  388.                 "                                                    \n"
  389.                 "DOKUMENTATION (36 K - 700 KB)                       \n"
  390.                 "                                                    \n"
  391.                 "Die Online-Dokumentation.                           \n"
  392.                 "                                                    \n"
  393.                 "ADD-ONS (0 - 1.7 MB)                                \n"
  394.                 "                                                    \n"
  395.                 "Mitgeliefert werden die Rechtschreibprüfung Joyce,  \n"
  396.                 "ein Thesaurus, Anpassungen an diverse C-Compiler,   \n"
  397.                 "die HTML-Umgebung Webworld (zur Bearbeitung von     \n"
  398.                 "HTML-Dateien mit dem Editor), Anpassungen an        \n"
  399.                 "verschiedene E-Mail-Programme, usw.                 \n"
  400.                 "                                                    \n"
  401.                 "ENTWICKLERUNTERLAGEN (550 KB)                       \n"
  402.                 "                                                    \n"
  403.                 "Material für die Entwicklung von Erweiterungen für  \n"
  404.                 "GoldED: Quelltexte, Autodocs, Includes, Catalogs,   \n"
  405.                 "usw.                                                \n"
  406.                 "                                                    \n"
  407.                 "SCREENSHOT (40 KB)                                  \n"
  408.                 "                                                    \n"
  409.                 "Ein Screenshot von GoldED.                          \n"
  410.                 "                                                    \n"
  411.                 "NOTFALLPROGTRAMM (6 KB)                             \n"
  412.                 "                                                    \n"
  413.                 "Stellt nach Betriebssystemabstürzen den zuletzt     \n"
  414.                 "bearbeiteten Text wieder her.                       \n"
  415.             )
  416.         )
  417.  
  418.         (set #studio_components_golded     "GoldED")
  419.         (set #studio_components_starter    "Starter")
  420.         (set #studio_components_docs       "Dokumentation")
  421.         (set #studio_components_addons     "Add-Ons")
  422.         (set #studio_components_developer  "Entwicklerunterlagen")
  423.         (set #studio_components_screenshot "Screenshot")
  424.         (set #studio_components_recover    "Notfallprogramm")
  425.  
  426.         (set #studio_preset_install_A
  427.  
  428.             (cat
  429.  
  430.                 "Wählen Sie die Grundeinstellungen, die installiert  \n"
  431.                 "werden sollen (Seite 1 von 2):                      \n"
  432.             )
  433.         )
  434.  
  435.         (set #studio_preset_install_B
  436.  
  437.             (cat
  438.  
  439.                 "Wählen Sie die Grundeinstellungen, die installiert  \n"
  440.                 "werden sollen (Seite 2 von 2):                      \n"
  441.             )
  442.         )
  443.  
  444.         (set #studio_preset_install_help
  445.  
  446.             (cat
  447.  
  448.                 "Der Editor verwendet die Grundeinstellungen, wenn   \n"
  449.                 "normale Texte bearbeitet werden, für die kein       \n"
  450.                 "besonderer Dateityp definiert wurde.                \n"
  451.             )
  452.         )
  453.  
  454.         (set #studio_preset_display        "Anzeige")
  455.         (set #studio_preset_interface      "Benutzeroberfläche")
  456.         (set #studio_preset_hunter         "Dateisuche")
  457.         (set #studio_preset_printer        "Drucker")
  458.         (set #studio_preset_context        "Kontext")
  459.         (set #studio_preset_syntax         "Farbcodierung")
  460.         (set #studio_preset_layout         "Layout")
  461.         (set #studio_preset_mouse          "Maus")
  462.         (set #studio_preset_menu           "Menu")
  463.         (set #studio_preset_api            "Plug-Ins")
  464.         (set #studio_preset_project        "Projekte")
  465.         (set #studio_preset_references     "Referenzen")
  466.         (set #studio_preset_gadgets        "Symboleisten")
  467.         (set #studio_preset_tabs           "Tabulatoren")
  468.         (set #studio_preset_keyboard       "Tastatur")
  469.         (set #studio_preset_templates      "Templates")
  470.         (set #studio_preset_misc           "Verschiedenes")
  471.         (set #studio_preset_dictionary     "Wörterbücher")
  472.  
  473.         (set #studio_locale "Wählen Sie eine Sprache für die Grundeinstellungen:")
  474.  
  475.         (set #studio_locale_help
  476.  
  477.             (cat
  478.  
  479.                 "Die Berücksichtigung der vom Benutzer bevorzugten   \n"
  480.                 "Sprache bei der Beschriftung der Eingabefelder      \n"
  481.                 "erfolgt automatisch. Die Sprache der änderbaren     \n"
  482.                 "Komponenten (Einstellungen für Menus, Symbolleisten \n"
  483.                 "usw.) muß dagegen während der Installation gewählt  \n"
  484.                 "werden, damit die entsprechenden Konfigurationsdaten\n"
  485.                 "installiert werden können.                          \n"
  486.             )
  487.         )
  488.  
  489.         (set #studio_starter_help
  490.  
  491.             (cat
  492.  
  493.                 "SCHNELLSTARTER (5 KB)                               \n"
  494.                 "                                                    \n"
  495.                 "Das Startprogramm für den Editor: dieses Programm   \n"
  496.                 "kann wie ein normaler Editor verwendet werden,      \n"
  497.                 "bietet aber erweiterte Möglichkeiten, die sie beim  \n"
  498.                 "direkten Start von GoldED nicht haben. Der direkte  \n"
  499.                 "Start von GoldED sollte grundsätzlich vermieden     \n"
  500.                 "werden: verwenden Sie immer den Starter, um den     \n"
  501.                 "Editor zu starten.                                  \n"
  502.                 "                                                    \n"
  503.                 "DRAG & DROP STARTER (8 KB)                          \n"
  504.                 "                                                    \n"
  505.                 "Erzeugt ein Drag & Drop-Icon auf der Workbench: Sie \n"
  506.                 "können auf dieses Symbol klicken, um den Editor zu  \n"
  507.                 "starten oder Dateien auf dieses Symbol ziehen, um   \n"
  508.                 "sie im Editor zu öffnen.                            \n"
  509.             )
  510.         )
  511.  
  512.         (set #studio_starter_ed      "Schnellstarter")
  513.         (set #studio_starter_appicon "Drag & Drop-Starter")
  514.  
  515.         (set #studio_parts_install
  516.  
  517.             (cat
  518.  
  519.                 "                                                    \n"
  520.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  521.                 "installiert bzw. aktualisiert werden sollen:        \n"
  522.             )
  523.         )
  524.  
  525.         (set #studio_parts_install_a
  526.  
  527.             (cat
  528.  
  529.                 "                                                    \n"
  530.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  531.                 "aktualisiert werden sollen (Seite 1 von 3):         \n"
  532.             )
  533.         )
  534.         (set #studio_parts_install_b
  535.  
  536.             (cat
  537.  
  538.                 "                                                    \n"
  539.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  540.                 "aktualisiert werden sollen (Seite 2 von 3):         \n"
  541.             )
  542.         )
  543.  
  544.         (set #studio_parts_install_c
  545.  
  546.             (cat
  547.  
  548.                 "                                                    \n"
  549.                 "Wählen Sie die Komponenten, die installiert bzw.    \n"
  550.                 "aktualisiert werden sollen (Seite 3 von 3):         \n"
  551.             )
  552.         )
  553.  
  554.         (set #studio_parts_uninstall
  555.  
  556.             (cat
  557.  
  558.                 "                                                    \n"
  559.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  560.                 "entfernt werden sollen:                             \n"
  561.             )
  562.         )
  563.  
  564.         (set #studio_parts_uninstall_a
  565.  
  566.             (cat
  567.  
  568.                 "                                                    \n"
  569.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  570.                 "entfernt werden sollen (Seite 1 von 3):             \n"
  571.             )
  572.         )
  573.  
  574.         (set #studio_parts_uninstall_b
  575.  
  576.             (cat
  577.  
  578.                 "                                                    \n"
  579.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  580.                 "entfernt werden sollen (Seite 2 von 3):             \n"
  581.             )
  582.         )
  583.  
  584.         (set #studio_parts_uninstall_c
  585.  
  586.             (cat
  587.  
  588.                 "                                                    \n"
  589.                 "Wählen Sie die Komponenten dieser Kategorie, die    \n"
  590.                 "entfernt werden sollen (Seite 3 von 3):             \n"
  591.             )
  592.         )
  593.  
  594.         (set #studio_manual_help
  595.  
  596.             (cat
  597.  
  598.                 "HISTORY                                             \n"
  599.                 "                                                    \n"
  600.                 "Revisionsgeschichte (English)                       \n"
  601.                 "                                                    \n"
  602.                 "LIZENZ                                              \n"
  603.                 "                                                    \n"
  604.                 "Lizenzbedingungen.                                  \n"
  605.                 "                                                    \n"
  606.                 "BESTELLINFORMATIONEN                                \n"
  607.                 "                                                    \n"
  608.                 "Bezugsquellennachweis für Updates                   \n"
  609.                 "                                                    \n"
  610.                 "ENGLISCHE/DEUTSCHE DOKUMENTATION                    \n"
  611.                 "                                                    \n"
  612.                 "Online-Dokumentation im AmigaGuide-Format.          \n"
  613.             )
  614.         )
  615.  
  616.         (set #studio_manual_history  "History")
  617.         (set #studio_manual_licence  "Lizenz")
  618.         (set #studio_manual_order    "Bestellinformationen")
  619.         (set #studio_manual_english  "Englische Dokumentation")
  620.         (set #studio_manual_german   "Deutsche Dokumentation")
  621.  
  622.         (set #studio_registry
  623.  
  624.             (cat
  625.  
  626.                 "ACHTUNG: Beim Wiederherstellen dieser zentralen     \n"
  627.                 "Konfigurationsdatei verlieren Sie alle globalen     \n"
  628.                 "Einstellungen im Editor sowie weiterhin alle        \n"
  629.                 "Dateitypen mit Ausnahme des Dateityps TEXT !        \n"
  630.             )
  631.         )
  632.  
  633.         (set #studio_registry_restore "Wiederherstellen")
  634.         (set #studio_registry_keep    "Beibehalten")
  635.  
  636.         (set #studio_registry_help
  637.  
  638.             (cat
  639.  
  640.                 "Die zentrale Konfigurationsdatei (Registry) enthält \n"
  641.                 "alle dateitypunabhängigen globalen Einstellungen    \n"
  642.                 "inklusive der Dateitypliste.                        \n"
  643.             )
  644.         )
  645.  
  646.         (set #studio_nostartup "Die Datei s:user-startup fehlt oder ist beschädigt !\n")
  647.  
  648.         (set #startup_ask
  649.  
  650.             (cat
  651.  
  652.                 "Sollen die notwendigen Einträge in der Startup-Datei\n"
  653.                 "des Rechners jetzt erzeugt werden ?                 \n"
  654.             )
  655.         )
  656.  
  657.         (set #startup_ask_help
  658.  
  659.             (cat
  660.  
  661.                 "Es wird der notwendige Assign auf das Verzeichnis   \n"
  662.                 "des Editors eingerichtet.                           \n"
  663.             )
  664.         )
  665.  
  666.         (set #studio_addons_help
  667.  
  668.             (cat
  669.  
  670.                 "WEBWORLD                                            \n"
  671.                 "                                                    \n"
  672.                 "Erweiterung zur Bearbeitung von Internet-Seiten.    \n"
  673.                 "                                                    \n"
  674.                 "RECHTSCHREIBPRÜFUNG JOYCE                           \n"
  675.                 "                                                    \n"
  676.                 "Rechtschreibprüfung Deutsch/Englisch. Markiert die  \n"
  677.                 "Fehler im Text schon beim Schreiben. Belegt 2-4 MB  \n"
  678.                 "Speicher !                                          \n"
  679.                 "                                                    \n"
  680.                 "ROGET'S THESAURUS                                   \n"
  681.                 "                                                    \n"
  682.                 "Englisches Thesaurus: Umfangreiches Nachschlagewerk \n"
  683.                 "für Synonyme. Belegt 2 MB Speicher !                \n"
  684.                 "                                                    \n"
  685.                 "SCRIPTING                                           \n"
  686.                 "                                                    \n"
  687.                 "Unterstützung für die Bearbeitung der Startup-      \n"
  688.                 "Sequenz (Farbcodierung).                            \n"
  689.                 "                                                    \n"
  690.                 "AMIGAGUIDE PUBLISHER                                \n"
  691.                 "                                                    \n"
  692.                 "Erweiterung zur Bearbeitung von AmigaGuide-Dateien. \n"
  693.                 "                                                    \n"
  694.                 "SUPPORT FÜR STORMC                                  \n"
  695.                 "                                                    \n"
  696.                 "Umfangreicher Support für den StormC-Compiler: C/C++\n"
  697.                 "Farbhervorhebung, Toolbars, Anzeige der passenden   \n"
  698.                 "Klammer beim Schreiben, etc.                        \n"
  699.                 "                                                    \n"
  700.                 "SUPPORT FÜR SAS/C                                   \n"
  701.                 "                                                    \n"
  702.                 "Umfangreicher Support für den SAS/C-Compiler: C/C++ \n"
  703.                 "Farbhervorhebung, Toolbars, Anzeige der passenden   \n"
  704.                 "Klammer beim Schreiben, etc.                        \n"
  705.                 "                                                    \n"
  706.                 "SUPPORT FÜR ANDERE C-COMPILER                       \n"
  707.                 "                                                    \n"
  708.                 "Unterstützung für andere C-Compiler.                \n"
  709.                 "                                                    \n"
  710.                 "SUPPORT FÜR ASSEMBLER                               \n"
  711.                 "                                                    \n"
  712.                 "Unterstützung für die Bearbeitung von Assembler-    \n"
  713.                 "Quelltexten (Farbcodierung).                        \n"
  714.                 "                                                    \n"
  715.                 "FAXVERSAND                                          \n"
  716.                 "                                                    \n"
  717.                 "Aktuellen Text als FAX verschicken. Erfordert das   \n"
  718.                 "Faxprogramm STFax.                                  \n"
  719.                 "                                                    \n"
  720.                 "UNTERSTÜTZUNG FÜR MICRODOT                          \n"
  721.                 "                                                    \n"
  722.                 "Anpassung an Microdot zum Schreiben von E-Mails.    \n"
  723.                 "                                                    \n"
  724.                 "UNTERSTÜTZUNG FÜR THOR                              \n"
  725.                 "                                                    \n"
  726.                 "Anpassung an Thor zum Schreiben von E-Mails.        \n"
  727.                 "                                                    \n"
  728.                 "DRUCKERERWEITERUNG FÜR PCL-DRUCKER                  \n"
  729.                 "                                                    \n"
  730.                 "PCL-Druckprogramm. PCL ist dir Druckersprache, die  \n"
  731.                 "von den meisten Laserdruckern und den meisten HP    \n"
  732.                 "Tintenstrahldruckern verwendet wird (Geräte von     \n"
  733.                 "Epson und Canon sind i.d.R. keine PCL-Drucker).     \n"
  734.                 "                                                    \n"
  735.                 "INSTALLER-ASSISTENT                                 \n"
  736.                 "                                                    \n"
  737.                 "Diese Erweiterung erleichert das Erstellen von      \n"
  738.                 "Installationdateien für den Amiga Installer. Bei-   \n"
  739.                 "spielsweise werden zusammengehörende Klammern in    \n"
  740.                 "der gleichen Farbe dargestellt, so daß Fehler in    \n"
  741.                 "der Programmstruktur schnell zu finden sind.        \n"
  742.             )
  743.         )
  744.  
  745.         (set #studio_addons_envwww "Webworld")
  746.         (set #studio_addons_envjcy "Rechtschreibprüfung Joyce")
  747.         (set #studio_addons_envthe "Roget's Thesaurus")
  748.         (set #studio_addons_envbat "Scripting")
  749.         (set #studio_addons_envgde "AmigaGuide Publisher")
  750.         (set #studio_addons_envstm "Support für StormC")
  751.         (set #studio_addons_envsas "Support für SAS/C")
  752.         (set #studio_addons_envcpp "Support für andere C-Compiler")
  753.         (set #studio_addons_envasm "Support für Assembler")
  754.         (set #studio_addons_envfax "Faxversand")
  755.         (set #studio_addons_envmdt "Unterstützung für Microdot")
  756.         (set #studio_addons_envthr "Unterstützung für Thor")
  757.         (set #studio_addons_envprt "Druckererweiterung für PCL-Drucker")
  758.         (set #studio_addons_envrcs "Revisionskontrolle")
  759.         (set #studio_addons_envins "Installer-Assistent")
  760.  
  761.         (set #studio_addons_install "Installation der Add-Ons ...")
  762.         (set #studio_addons_error   "Diese Add-On-Installation wurde abgebrochen und ist unvollständig !")
  763.  
  764.         (set #studio_ioerr "Lesefehler auf der Installations-CD !")
  765.     )
  766.  
  767.     ; english strings
  768.  
  769.     (
  770.         (set #studio_reboot "Please reboot the computer after installation !")
  771.  
  772.         (set #studio_rexxerr
  773.  
  774.             (cat
  775.  
  776.                 "Warning: ARexx Installation is incomplete. File not \n"
  777.                 "found error:                                        \n"
  778.                 "                                                    \n"
  779.             )
  780.         )
  781.  
  782.         (set #studio_overwrite
  783.  
  784.             (cat
  785.  
  786.                 "A drawer named Studio already exists in this path ! \n"
  787.                 "Continue with installation into this drawer ?       \n"
  788.             )
  789.         )
  790.  
  791.         (set #studio_overwrite_help
  792.  
  793.             (cat
  794.  
  795.                 "This drawer could belong to another program or to a \n"
  796.                 "previous incomplete installation.                   \n"
  797.             )
  798.         )
  799.  
  800.         (set #studio_overwrite_install "Install")
  801.  
  802.         (set #studio_overwrite_cancel  "Choose other path")
  803.  
  804.         (set #studio_badkick "This program requires AmigaOS 3 !")
  805.  
  806.         (set #studio_notify
  807.  
  808.             (cat
  809.  
  810.                 "An error has occured during the last installation.  \n"
  811.                 "We recommend to repeat a minimum installation to    \n"
  812.                 "another drawer.                                     \n"
  813.                 "                                                    \n"
  814.                 "Please terminate all other programs before you      \n"
  815.                 "repeat installation !                               \n"
  816.             )
  817.         )
  818.  
  819.         (set #studio_welcome
  820.  
  821.             (cat
  822.  
  823.                 "Welcome to the GoldED Studio 5 Demo Setup !         \n"
  824.                 "                                                    \n"
  825.                 "This program installs or updates GoldED Studio on   \n"
  826.                 "your computer.                                      \n"
  827.                 "                                                    \n"
  828.                 "We recommend to terminate all other programs before \n"
  829.                 "you continue with setup !                           \n"
  830.                 "                                                    \n"
  831.                 "WARNING: This software is protected by international\n"
  832.                 "and national laws. Unauthorized distribution or     \n"
  833.                 "rental of this software or one of its components are\n"
  834.                 "prosecuted to the full extent possible.             \n"
  835.             )
  836.         )
  837.  
  838.         (set #studio_installerr
  839.  
  840.             (cat
  841.  
  842.                 "An error has occured during the installation. An    \n"
  843.                 "error description can be found in the logfile (see  \n"
  844.                 "t: directory) if you did enable log file creation.  \n"
  845.                 "The error code is:                                  \n"
  846.                 "                                                    \n"
  847.             )
  848.         )
  849.  
  850.         (set #studio_yourname "Enter your name:")
  851.  
  852.         (set #studio_yourname_help
  853.  
  854.             (cat
  855.  
  856.                 "The name is required for product registration. The  \n"
  857.                 "software can not be installed without registration. \n"
  858.             )
  859.         )
  860.  
  861.         (set #studio_check
  862.  
  863.             (cat
  864.  
  865.                 "Is this correct ?                                   \n"
  866.                 "                                                    \n"
  867.                 "%s"
  868.             )
  869.         )
  870.  
  871.         (set #studio_check_continue "Accept")
  872.  
  873.         (set #studio_check_repeat "Modify")
  874.  
  875.         (set #studio_found
  876.  
  877.             (cat
  878.  
  879.                 "This software has been installed before:            \n"
  880.                 "                                                    \n"
  881.                 "Choose UPDATE to update, add or remove components   \n"
  882.                 "of the existing installation.                       \n"
  883.                 "                                                    \n"
  884.                 "Choose OTHER DIRECTORY to install again to another  \n"
  885.                 "directory.                                          \n"
  886.             )
  887.         )
  888.  
  889.         (set #studio_found_help
  890.  
  891.             (cat
  892.  
  893.                 "UPDATE                                              \n"
  894.                 "                                                    \n"
  895.                 "Updates the existing installation: update, add or   \n"
  896.                 "remove its components.                              \n"
  897.                 "                                                    \n"
  898.                 "OTHER DIRECTORY                                     \n"
  899.                 "                                                    \n"
  900.                 "Repeat installation to another directory. Your old  \n"
  901.                 "installation remains unchanged. You shouldn't use   \n"
  902.                 "this installation type unless you have problems with\n"
  903.                 "your existing installation.                         \n"
  904.             )
  905.         )
  906.  
  907.         (set #studio_found_confirm "Update")
  908.  
  909.         (set #studio_found_newinstall "Other directory")
  910.  
  911.         (set #studio_path_choose
  912.  
  913.             (cat
  914.  
  915.                 "Choose a path for installation. The setup program   \n"
  916.                 "will create a directory for GoldED Studio in the    \n"
  917.                 "path you specify:                                   \n"
  918.             )
  919.         )
  920.  
  921.         (set #studio_path_choose_help
  922.  
  923.             (cat
  924.  
  925.                 "Disk space requirements on the choosen drive depend \n"
  926.                 "on the further installation process. About 30 MB are\n"
  927.                 "required for a full installation.                   \n"
  928.                 "                                                    \n"
  929.                 "Installation over an existing GoldED 3 or GoldED 4  \n"
  930.                 "setup is not possible. You can load old settings    \n"
  931.                 "after installation since version 5 is backwards     \n"
  932.                 "compatible with GoldED 4 configuration files.       \n"
  933.             )
  934.         )
  935.  
  936.         (set #studio_installtype "Choose the installation type:")
  937.  
  938.         (set #studio_installtype_help
  939.  
  940.             (cat
  941.  
  942.                 "You can add or remove components after installation \n"
  943.                 "by running the setup program again.                 \n"
  944.             )
  945.         )
  946.  
  947.         (set #studio_installtype_minimum "Minimum installation (500 KB)")
  948.         (set #studio_installtype_user    "User defined (up to 3.7 MB)")
  949.         (set #studio_installtype_normal  "Typical installation (2 MB)")
  950.  
  951.         (set #studio_checking "Examining existing installation ...")
  952.  
  953.         (set #studio_updatemode_reinstall "Upgrade current installation")
  954.         (set #studio_updatemode_add       "Add components")
  955.         (set #studio_updatemode_remove    "Remove components")
  956.         (set #studio_updatemode_presets   "Install default configuration")
  957.         (set #studio_updatemode_registry  "Restore registry")
  958.         (set #studio_updatemode_startup   "Fix user startup sequence")
  959.         (set #studio_updatemode_exit      "Leave setup")
  960.  
  961.         (set #studio_updatemode_help
  962.  
  963.             (cat
  964.  
  965.                 "UPGRADE CURRENT INSTALLATION                        \n"
  966.                 "                                                    \n"
  967.                 "Installed components with exception of configuration\n"
  968.                 "files are reinstalled.                              \n"
  969.                 "                                                    \n"
  970.                 "ADD/REMOVE COMPONENTS                               \n"
  971.                 "                                                    \n"
  972.                 "Modifies the current installation by adding or      \n"
  973.                 "removing components (add-ons, manuals, etc.).       \n"
  974.                 "                                                    \n"
  975.                 "INSTALL DEFAULT CONFIGURATION                       \n"
  976.                 "                                                    \n"
  977.                 "Select the default configuration elements you would \n"
  978.                 "like to see reinstalled (menu, colors, etc.). The   \n"
  979.                 "editor uses the default configuration whenever you  \n"
  980.                 "load a text which has no specific file type         \n"
  981.                 "associated with it.                                 \n"
  982.                 "                                                    \n"
  983.                 "RESTORE REGISTRY                                    \n"
  984.                 "                                                    \n"
  985.                 "Reinstalls the central configuration file. You'll   \n"
  986.                 "loose all global settings and all filetypes with    \n"
  987.                 "exception of the type TEXT if you restore the       \n"
  988.                 "registry !                                          \n"
  989.                 "                                                    \n"
  990.                 "FIX USER-STARTUP SEQUENCE                           \n"
  991.                 "                                                    \n"
  992.                 "Adds the assign required by this sofwtare to the    \n"
  993.                 "user startup sequence of your system.               \n"
  994.             )
  995.  
  996.         )
  997.  
  998.         (set #studio_components_install
  999.  
  1000.             (cat
  1001.  
  1002.                 "Choose the categories to be installed:              \n"
  1003.             )
  1004.         )
  1005.  
  1006.         (set #studio_components_update
  1007.  
  1008.             (cat
  1009.  
  1010.                 "Choose the categories to be updated or installed:   \n"
  1011.             )
  1012.         )
  1013.  
  1014.         (set #studio_components_remove
  1015.  
  1016.             (cat
  1017.  
  1018.                 "Choose the categories to be removed completely or   \n"
  1019.                 "in parts:                                           \n"
  1020.             )
  1021.         )
  1022.  
  1023.         (set #studio_components_help
  1024.  
  1025.             (cat
  1026.  
  1027.                 "GOLDED (1.76 MB)                                    \n"
  1028.                 "                                                    \n"
  1029.                 "The editor GoldED and the files and directories     \n"
  1030.                 "required by GoldED.                                 \n"
  1031.                 "                                                    \n"
  1032.                 "STARTER (0 - 15 KB)                                 \n"
  1033.                 "                                                    \n"
  1034.                 "Starter programs which simplify usage of the editor \n"
  1035.                 "(Drag & Drop).                                      \n"
  1036.                 "                                                    \n"
  1037.                 "DOCUMENTATION (36 K - 700 KB)                       \n"
  1038.                 "                                                    \n"
  1039.                 "Online documentation.                               \n"
  1040.                 "                                                    \n"
  1041.                 "ADD-ONS (0 - 1.7 MB)                                \n"
  1042.                 "                                                    \n"
  1043.                 "Includes the spell checking module Joyce, Roget's   \n"
  1044.                 "thesaurus, support for various C compilers, the     \n"
  1045.                 "HTML environment Webworld (for writing HTML files   \n"
  1046.                 "with the editor), support for various e-mailer,     \n"
  1047.                 "etc.                                                \n"
  1048.                 "                                                    \n"
  1049.                 "DSEVELOPER MATERIAL (550 KB)                        \n"
  1050.                 "                                                    \n"
  1051.                 "Material for developing extensions for GoldED:      \n"
  1052.                 "source codes, autodocs, includes, catalogs, etc.    \n"
  1053.                 "                                                    \n"
  1054.                 "SCREENSHOT (40 KB)                                  \n"
  1055.                 "                                                    \n"
  1056.                 "A screenshot of GoldED.                             \n"
  1057.                 "                                                    \n"
  1058.                 "EMERGENCY RECOVERY (6 KB)                           \n"
  1059.                 "                                                    \n"
  1060.                 "Restores a text lost during a system crash.         \n"
  1061.             )
  1062.         )
  1063.  
  1064.         (set #studio_components_golded     "GoldED")
  1065.         (set #studio_components_starter    "Starter")
  1066.         (set #studio_components_docs       "Documentation")
  1067.         (set #studio_components_addons     "Add-Ons")
  1068.         (set #studio_components_developer  "Developer material")
  1069.         (set #studio_components_screenshot "Screenshot")
  1070.         (set #studio_components_recover    "Emergency Recovery")
  1071.  
  1072.         (set #studio_preset_install_A
  1073.  
  1074.             (cat
  1075.  
  1076.                 "Chose the default configuration elements you would  \n"
  1077.                 "like to have installed (page 1 of 2):               \n"
  1078.             )
  1079.         )
  1080.  
  1081.         (set #studio_preset_install_B
  1082.  
  1083.             (cat
  1084.  
  1085.                 "Chose the default configuration elements you would  \n"
  1086.                 "like to have installed (page 2 of 2):               \n"
  1087.             )
  1088.         )
  1089.  
  1090.         (set #studio_preset_install_help
  1091.  
  1092.             (cat
  1093.  
  1094.                 "The editor uses the default configuration whenever  \n"
  1095.                 "you load a text which has no specific file type     \n"
  1096.                 "associated with it.                                 \n"
  1097.             )
  1098.         )
  1099.  
  1100.         (set #studio_preset_display        "Display configuration")
  1101.         (set #studio_preset_interface      "User interface")
  1102.         (set #studio_preset_hunter         "File search")
  1103.         (set #studio_preset_printer        "Printer configuration")
  1104.         (set #studio_preset_context        "Context")
  1105.         (set #studio_preset_syntax         "Syntax highlighting")
  1106.         (set #studio_preset_layout         "Formatting")
  1107.         (set #studio_preset_mouse          "Mouse")
  1108.         (set #studio_preset_menu           "Menu")
  1109.         (set #studio_preset_api            "Plug-Ins")
  1110.         (set #studio_preset_project        "Projects")
  1111.         (set #studio_preset_references     "References")
  1112.         (set #studio_preset_gadgets        "Toolbars")
  1113.         (set #studio_preset_tabs           "Tabs")
  1114.         (set #studio_preset_keyboard       "Keyboard")
  1115.         (set #studio_preset_templates      "Templates")
  1116.         (set #studio_preset_misc           "Miscellaneous")
  1117.         (set #studio_preset_dictionary     "Dictionaries")
  1118.  
  1119.         (set #studio_locale "Choose a language for the default configuration:")
  1120.  
  1121.         (set #studio_locale_help
  1122.  
  1123.             (cat
  1124.  
  1125.                 "While gadget labels are localized automatically, the\n"
  1126.                 "language for configurable elements (configuration of\n"
  1127.                 "menus, toolbars, etc.) has to be choosen during the \n"
  1128.                 "setup so that the correct files can be installed.   \n"
  1129.             )
  1130.         )
  1131.  
  1132.         (set #studio_starter_help
  1133.  
  1134.             (cat
  1135.  
  1136.                 "QUICK STARTER (5 KB)                                \n"
  1137.                 "                                                    \n"
  1138.                 "The starter for the editor: while this program can  \n"
  1139.                 "be use like a normal editor (GoldED), it offers you \n"
  1140.                 "features not available when running GoldED directly;\n"
  1141.                 "you should in fact avoid running GoldED directly and\n"
  1142.                 "always use the starter.                             \n"
  1143.                 "                                                    \n"
  1144.                 "DRAG & DROP STARTER (8 KB)                          \n"
  1145.                 "                                                    \n"
  1146.                 "Creates a drag and drop icon on your workbench where\n"
  1147.                 "you can drag files to open them in the editor.      \n"
  1148.             )
  1149.         )
  1150.  
  1151.         (set #studio_starter_ed      "Quick Starter")
  1152.         (set #studio_starter_appicon "Drag & Drop Starter")
  1153.  
  1154.         (set #studio_parts_install
  1155.  
  1156.             (cat
  1157.  
  1158.                 "                                                    \n"
  1159.                 "Choose the components of this category to be        \n"
  1160.                 "installed or updated:                               \n"
  1161.             )
  1162.         )
  1163.  
  1164.         (set #studio_parts_install_a
  1165.  
  1166.             (cat
  1167.  
  1168.                 "                                                    \n"
  1169.                 "Choose the components of this category to be        \n"
  1170.                 "installed or updated (page 1 of 3):                 \n"
  1171.             )
  1172.         )
  1173.  
  1174.         (set #studio_parts_install_b
  1175.  
  1176.             (cat
  1177.  
  1178.                 "                                                    \n"
  1179.                 "Choose the components of this category to be        \n"
  1180.                 "installed or updated (page 2 of 3):                 \n"
  1181.             )
  1182.         )
  1183.  
  1184.         (set #studio_parts_install_c
  1185.  
  1186.             (cat
  1187.  
  1188.                 "                                                    \n"
  1189.                 "Choose the components of this category to be        \n"
  1190.                 "installed or updated (page 3 of 3):                 \n"
  1191.             )
  1192.         )
  1193.  
  1194.         (set #studio_parts_uninstall
  1195.  
  1196.             (cat
  1197.  
  1198.                 "                                                    \n"
  1199.                 "Choose the components of this category to be        \n"
  1200.                 "removed:                                            \n"
  1201.             )
  1202.         )
  1203.  
  1204.         (set #studio_parts_uninstall_a
  1205.  
  1206.             (cat
  1207.  
  1208.                 "                                                    \n"
  1209.                 "Choose the components of this category to be        \n"
  1210.                 "removed (page 1 of 3):                              \n"
  1211.             )
  1212.         )
  1213.  
  1214.         (set #studio_parts_uninstall_b
  1215.  
  1216.             (cat
  1217.  
  1218.                 "                                                    \n"
  1219.                 "Choose the components of this category to be        \n"
  1220.                 "removed (page 2 of 3):                              \n"
  1221.             )
  1222.         )
  1223.  
  1224.         (set #studio_parts_uninstall_c
  1225.  
  1226.             (cat
  1227.  
  1228.                 "                                                    \n"
  1229.                 "Choose the components of this category to be        \n"
  1230.                 "removed (page 3 of 3):                              \n"
  1231.             )
  1232.         )
  1233.  
  1234.         (set #studio_manual_help
  1235.  
  1236.             (cat
  1237.  
  1238.                 "HISTORY                                             \n"
  1239.                 "                                                    \n"
  1240.                 "Revision history                                    \n"
  1241.                 "                                                    \n"
  1242.                 "LICENCE                                             \n"
  1243.                 "                                                    \n"
  1244.                 "User licence                                        \n"
  1245.                 "                                                    \n"
  1246.                 "ORDERING INFORMATION                                \n"
  1247.                 "                                                    \n"
  1248.                 "Information for ordering updates                    \n"
  1249.                 "                                                    \n"
  1250.                 "ENGLISH/GERMAN DOCUMENTATION                        \n"
  1251.                 "                                                    \n"
  1252.                 "Online documentation in AmigaGuide format.          \n"
  1253.             )
  1254.         )
  1255.  
  1256.         (set #studio_manual_history  "History")
  1257.         (set #studio_manual_licence  "Licence")
  1258.         (set #studio_manual_order    "Ordering information")
  1259.         (set #studio_manual_english  "English documentation")
  1260.         (set #studio_manual_german   "German documentation")
  1261.  
  1262.         (set #studio_registry
  1263.  
  1264.             (cat
  1265.  
  1266.                 "WARNING: You will loose all global configuration    \n"
  1267.                 "settings and all file types with exception of the   \n"
  1268.                 "type TEXT if you restore the registry !             \n"
  1269.             )
  1270.         )
  1271.  
  1272.         (set #studio_registry_restore "Restore registry")
  1273.         (set #studio_registry_keep    "Skip this step")
  1274.  
  1275.         (set #studio_registry_help
  1276.  
  1277.             (cat
  1278.  
  1279.                 "The central configuration file (registry) contains  \n"
  1280.                 "all file type independent configuration settings    \n"
  1281.                 "including the global list of file types.            \n"
  1282.             )
  1283.         )
  1284.  
  1285.         (set #studio_nostartup "The file s:user-startup is missing or corrupt !\n")
  1286.  
  1287.         (set #startup_ask
  1288.  
  1289.             (cat
  1290.  
  1291.                 "Should the changes to the system's user startup     \n"
  1292.                 "sequence (as required by this software) be done     \n"
  1293.                 "now ?                                               \n"
  1294.             )
  1295.         )
  1296.  
  1297.         (set #startup_ask_help
  1298.  
  1299.             (cat
  1300.  
  1301.                 "This will add an assign pointing to the installation\n"
  1302.                 "directory.                                          \n"
  1303.             )
  1304.         )
  1305.  
  1306.         (set #studio_addons_help
  1307.  
  1308.             (cat
  1309.  
  1310.                 "WEBWORLD                                            \n"
  1311.                 "                                                    \n"
  1312.                 "Add-On for publishing internet (HTML) documents.    \n"
  1313.                 "                                                    \n"
  1314.                 "JOYCE SPELL CHECKING                                \n"
  1315.                 "                                                    \n"
  1316.                 "Spellchecking for English and German. Highlights    \n"
  1317.                 "spelling errors in a text while you are typing.     \n"
  1318.                 "Requires 2-4 MB RAM !                               \n"
  1319.                 "                                                    \n"
  1320.                 "ROGET'S THESAURUS                                   \n"
  1321.                 "                                                    \n"
  1322.                 "English thesaurus: lists synonyms from a 100000     \n"
  1323.                 "words database. Requires 2 MB RAM !                 \n"
  1324.                 "                                                    \n"
  1325.                 "SCRIPTING                                           \n"
  1326.                 "                                                    \n"
  1327.                 "Support for editing the startup sequence (syntax    \n"
  1328.                 "highlighting).                                      \n"
  1329.                 "                                                    \n"
  1330.                 "AMIGAGUIDE PUBLISHER                                \n"
  1331.                 "                                                    \n"
  1332.                 "Add-On for publishing AmigaGuide documents.         \n"
  1333.                 "                                                    \n"
  1334.                 "SUPPORT FOR STORMC                                  \n"
  1335.                 "                                                    \n"
  1336.                 "Support for the StormC compiler: C/C++ syntax       \n"
  1337.                 "highlighting, toolbars, shows the matching bracket  \n"
  1338.                 "while typing, etc.                                  \n"
  1339.                 "                                                    \n"
  1340.                 "SUPPORT FOR SAS/C                                   \n"
  1341.                 "                                                    \n"
  1342.                 "Support for the StormC compiler: C/C++ syntax       \n"
  1343.                 "highlighting, toolbars, shows the matching bracket  \n"
  1344.                 "while typing, etc.                                  \n"
  1345.                 "                                                    \n"
  1346.                 "SUPPORT FOR OTHER C COMPILERS                       \n"
  1347.                 "                                                    \n"
  1348.                 "C++ syntax highlighting and other extensions.       \n"
  1349.                 "                                                    \n"
  1350.                 "SUPPORT FOR ASSEMBLER                               \n"
  1351.                 "                                                    \n"
  1352.                 "Support for editing assembler source codes.         \n"
  1353.                 "                                                    \n"
  1354.                 "FAX                                                 \n"
  1355.                 "                                                    \n"
  1356.                 "Sends current text as FAX. Requires the fax program \n"
  1357.                 "STFax.                                              \n"
  1358.                 "                                                    \n"
  1359.                 "SUPPORT FOR MICRODOT                                \n"
  1360.                 "                                                    \n"
  1361.                 "Support for writing e-mails with Microdot (syntax   \n"
  1362.                 "highlighting and signature support).                \n"
  1363.                 "                                                    \n"
  1364.                 "SUPPORT FOR THOR                                    \n"
  1365.                 "                                                    \n"
  1366.                 "Support for writing e-mails with Thor (syntax       \n"
  1367.                 "highlighting and signature support).                \n"
  1368.                 "                                                    \n"
  1369.                 "PCL PRINTING UTILITY                                \n"
  1370.                 "                                                    \n"
  1371.                 "A printing utility for PCL printers. PCL is the     \n"
  1372.                 "printer command language used by most laser printers\n"
  1373.                 "and most HP (but not Epson or Canon) inkjets.       \n"
  1374.                 "                                                    \n"
  1375.                 "INSTALLER WIZARD                                    \n"
  1376.                 "                                                    \n"
  1377.                 "This add-on simplifies the creation of installer    \n"
  1378.                 "scripts compatible with the Amiga Installer. For    \n"
  1379.                 "example, matching brackets have the same color so   \n"
  1380.                 "that nesting errors can be found quickly.           \n"
  1381.             )
  1382.         )
  1383.  
  1384.         (set #studio_addons_envwww "Webworld")
  1385.         (set #studio_addons_envjcy "Joyce Spell Checking")
  1386.         (set #studio_addons_envthe "Roget's Thesaurus")
  1387.         (set #studio_addons_envbat "Scripting")
  1388.         (set #studio_addons_envgde "AmigaGuide Publisher")
  1389.         (set #studio_addons_envstm "Support for StormC")
  1390.         (set #studio_addons_envsas "Support for SAS/C")
  1391.         (set #studio_addons_envcpp "Support for other C compilers")
  1392.         (set #studio_addons_envasm "Support for Assembler")
  1393.         (set #studio_addons_envfax "Fax")
  1394.         (set #studio_addons_envmdt "Support for Microdot")
  1395.         (set #studio_addons_envthr "Support for Thor")
  1396.         (set #studio_addons_envprt "PCL printing utility")
  1397.         (set #studio_addons_envrcs "Revision control system")
  1398.         (set #studio_addons_envins "Installer Wizard")
  1399.  
  1400.         (set #studio_addons_install "Installation of Add-Ons ...")
  1401.         (set #studio_addons_error   "This add-on installation has been aborted and is incomplete !")
  1402.  
  1403.         (set #studio_ioerr "Read error on installation CD !")
  1404.     )
  1405. )
  1406.  
  1407. ; -------------------------------- check OS ------------------------------------
  1408.  
  1409. ; check if we are running under OS 3
  1410.  
  1411. (if (< (/ (getversion) 65536) 39)
  1412.  
  1413.     (
  1414.         (delete "env:studioinstall")
  1415.  
  1416.         (textfile
  1417.  
  1418.             (dest "env:studioinstall")
  1419.  
  1420.             (append "ERROR")
  1421.         )
  1422.  
  1423.         (abort #studio_badkick)
  1424.     )
  1425. )
  1426.  
  1427. (if (not (exists "sys:system/rexxmast"))
  1428.  
  1429.     (message (cat #studio_rexxerr "sys:system/rexxmast"))
  1430. )
  1431.  
  1432. (if (not (exists "libs:rexxsyslib.library"))
  1433.  
  1434.     (message (cat #studio_rexxerr "libs:rexxsyslib.library"))
  1435. )
  1436.  
  1437. ; --------------------------------- procedures ---------------------------------
  1438.  
  1439. ; uninstall an add-on (input: <studio_installpath>)
  1440.  
  1441. (procedure studio_proc_uninstall
  1442.  
  1443.     (
  1444.         (set studio_installcmd ("setup path \"%s\" icon \"%s\"" (pathonly studio_installpath) (fileonly studio_installpath)))
  1445.  
  1446.         ; request uninstall and run add-on setup
  1447.  
  1448.         (delete "env:installoptions")
  1449.  
  1450.         (textfile
  1451.  
  1452.             (dest "env:installoptions")
  1453.  
  1454.             (append "UNINSTALL")
  1455.         )
  1456.  
  1457.         (run studio_installcmd)
  1458.     )
  1459. )
  1460.  
  1461. ; install an add-on (input: <studio_installpath>)
  1462.  
  1463. (procedure studio_proc_install
  1464.  
  1465.     (
  1466.         (set studio_installcmd ("setup path \"%s\" icon \"%s\"" (pathonly studio_installpath) (fileonly studio_installpath)))
  1467.  
  1468.         ; set quiet mode
  1469.  
  1470.         (working #studio_addons_install)
  1471.  
  1472.         (delete "env:installoptions")
  1473.  
  1474.         (textfile
  1475.  
  1476.             (dest "env:installoptions")
  1477.  
  1478.             (append "INSTALLQUIET")
  1479.         )
  1480.  
  1481.         (run studio_installcmd)
  1482.  
  1483.         ; check return code of installation
  1484.  
  1485.         (if (exists "env:componentinstall")
  1486.  
  1487.             (set studio_installcode (getenv "componentinstall"))
  1488.  
  1489.             (set studio_installcode "ERROR")
  1490.         )
  1491.  
  1492.         (if (<> studio_installcode "OK")
  1493.  
  1494.             (message #studio_addons_error)
  1495.         )
  1496.     )
  1497. )
  1498.  
  1499. ; edit startup sequence
  1500.  
  1501. (procedure studio_proc_startup
  1502.  
  1503.     (
  1504.         (if (exists "s:user-startup")
  1505.  
  1506.             (
  1507.                 ; remove entries from previous installation
  1508.  
  1509.                 (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=HiSpeed")
  1510.  
  1511.                 (run "installdata/programs/stripstartup >NIL: LINES=6 SECTIONNAME=GED_quick")
  1512.             )
  1513.  
  1514.             (message #studio_nostartup)
  1515.         )
  1516.  
  1517.         (startup "GoldED"
  1518.  
  1519.             (prompt #startup_ask)
  1520.  
  1521.             (help #startup_ask_help)
  1522.  
  1523.             (command
  1524.  
  1525.                 ("assign golded: \"%s\"\n" (expandpath "golded:"))
  1526.  
  1527.                 ("assign libs:   \"%s\" add\n" (tackon (expandpath "golded:") "etc/libs"))
  1528.  
  1529.                 ("assign fonts:  \"%s\" add\n" (tackon (expandpath "golded:") "etc/fonts"))
  1530.             )
  1531.         )
  1532.     )
  1533. )
  1534.  
  1535. ; restore registry (input: none)
  1536.  
  1537. (procedure studio_proc_registry
  1538.  
  1539.     (
  1540.         (if (exists "golded:etc/registry/registry")
  1541.  
  1542.             (set studio_registry
  1543.  
  1544.                 (askbool
  1545.  
  1546.                     (prompt #studio_registry)
  1547.  
  1548.                     (choices
  1549.  
  1550.                         #studio_registry_restore
  1551.                         #studio_registry_keep
  1552.                     )
  1553.  
  1554.                     (help #studio_registry_help)
  1555.                 )
  1556.             )
  1557.  
  1558.             (set studio_registry 1)
  1559.         )
  1560.  
  1561.         (if (= studio_registry 1)
  1562.  
  1563.             (
  1564.                 (copyfiles
  1565.  
  1566.                     (source "installdata/registry/registry")
  1567.  
  1568.                     (dest "golded:etc/registry")
  1569.                 )
  1570.  
  1571.                 ; remove write protection for material copied from CD-ROM
  1572.  
  1573.                 (run "installdata/programs/unprotect basedir=golded:etc/registry")
  1574.  
  1575.                 ; save install path and serial code in registry
  1576.  
  1577.                 (run ("golded:add-ons/regedit/regedit SERIAL=\"%s\" INSTALLPATH=\"%s\"" studio_serial (expandpath "")))
  1578.             )
  1579.         )
  1580.     )
  1581. )
  1582.  
  1583. ; cleanup after installation (input: none)
  1584.  
  1585. (procedure studio_proc_cleanup
  1586.  
  1587.     (
  1588.         (delete "env:componentinstall")
  1589.  
  1590.         (delete "env:installoptions")
  1591.     )
  1592. )
  1593.  
  1594. ; save configuration (input: <studio_yourname>, <studio_language>, <studio_serial>)
  1595.  
  1596. (procedure studio_proc_savecfg
  1597.  
  1598.     (if (exists "golded:etc/env" (noreq))
  1599.  
  1600.         (
  1601.             (delete "golded:etc/env/name")
  1602.  
  1603.             (textfile
  1604.  
  1605.                 (dest "golded:etc/env/name")
  1606.  
  1607.                 (append studio_yourname)
  1608.             )
  1609.  
  1610.             (delete "golded:etc/env/language")
  1611.  
  1612.             (textfile
  1613.  
  1614.                 (dest "golded:etc/env/language")
  1615.  
  1616.                 (append studio_language)
  1617.             )
  1618.  
  1619.             (delete "golded:etc/env/serial")
  1620.  
  1621.             (textfile
  1622.  
  1623.                 (dest "golded:etc/env/serial")
  1624.  
  1625.                 (append studio_serial)
  1626.             )
  1627.         )
  1628.     )
  1629. )
  1630.  
  1631. ; select subcomponents for installation (input: <studio_components>, output: <studio_starter>, <studio_manual>)
  1632.  
  1633. (procedure studio_proc_chooseparts
  1634.  
  1635.     (
  1636.         ; choose add-ons
  1637.  
  1638.         (if (bitand studio_components @studio_components_addons)
  1639.  
  1640.             (
  1641.                 (set studio_addons_a
  1642.  
  1643.                     (askoptions
  1644.  
  1645.                         (prompt (cat #studio_components_addons #studio_parts_install_a))
  1646.  
  1647.                         (help #studio_addons_help)
  1648.  
  1649.                         (choices
  1650.  
  1651.                             #studio_addons_envwww
  1652.                             #studio_addons_envgde
  1653.                             #studio_addons_envthe
  1654.                             #studio_addons_envcpp
  1655.                             #studio_addons_envstm
  1656.                             #studio_addons_envsas
  1657.                         )   
  1658.  
  1659.                         (default studio_addons_a)
  1660.                     )
  1661.                 )
  1662.  
  1663.                 (set studio_addons_b
  1664.  
  1665.                     (askoptions
  1666.  
  1667.                         (prompt (cat #studio_components_addons #studio_parts_install_b))
  1668.  
  1669.                         (help #studio_addons_help)
  1670.  
  1671.                         (choices
  1672.  
  1673.                             #studio_addons_envasm
  1674.                             #studio_addons_envbat
  1675.                             #studio_addons_envfax
  1676.                             #studio_addons_envmdt
  1677.                             #studio_addons_envthr
  1678.                             #studio_addons_envjcy
  1679.                         )   
  1680.  
  1681.                         (default studio_addons_b)
  1682.                     )
  1683.                 )
  1684.  
  1685.                 (set studio_addons_c
  1686.  
  1687.                     (askoptions
  1688.  
  1689.                         (prompt (cat #studio_components_addons #studio_parts_install_c))
  1690.  
  1691.                         (help #studio_addons_help)
  1692.  
  1693.                         (choices
  1694.  
  1695.                             #studio_addons_envprt
  1696.                             #studio_addons_envrcs
  1697.                             #studio_addons_envins
  1698.                         )   
  1699.  
  1700.                         (default studio_addons_c)
  1701.                     )
  1702.                 )
  1703.             )
  1704.         )
  1705.  
  1706.         ; choose starter(s)
  1707.  
  1708.         (if (bitand studio_components @studio_components_starter)
  1709.  
  1710.             (
  1711.                 (set studio_starter
  1712.  
  1713.                     (askoptions
  1714.  
  1715.                         (prompt (cat #studio_components_starter #studio_parts_install))
  1716.  
  1717.                         (help #studio_starter_help)
  1718.  
  1719.                         (choices
  1720.  
  1721.                             #studio_starter_ed
  1722.                             #studio_starter_appicon
  1723.                         )
  1724.  
  1725.                         (default studio_starter)
  1726.                     )
  1727.                 )
  1728.             )
  1729.         )
  1730.  
  1731.         ; choose documentation
  1732.  
  1733.         (if (bitand studio_components @studio_components_docs)
  1734.  
  1735.             (
  1736.                 (set studio_manual
  1737.  
  1738.                     (askoptions
  1739.  
  1740.                         (prompt (cat #studio_components_docs #studio_parts_install))
  1741.  
  1742.                         (help #studio_manual_help)
  1743.  
  1744.                         (choices
  1745.  
  1746.                             #studio_manual_history
  1747.                             #studio_manual_licence
  1748.                             #studio_manual_order
  1749.                             #studio_manual_english
  1750.                             #studio_manual_german
  1751.                         )   
  1752.  
  1753.                         (default studio_manual)
  1754.                     )
  1755.                 )
  1756.             )
  1757.         )
  1758.     )
  1759. )
  1760.  
  1761. ; select subcomponents for removal (input: studio_remove, output: <studio_removeaddons_a>, <studio_removeaddons_b>, <studio_removestarter>, <studio_removemanual>)
  1762.  
  1763. (procedure studio_proc_removeparts
  1764.  
  1765.     (
  1766.         ; remove add-ons
  1767.  
  1768.         (if (bitand studio_remove @studio_components_addons)
  1769.  
  1770.             (
  1771.                 (set studio_removeaddons_a
  1772.  
  1773.                     (askoptions
  1774.  
  1775.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_a))
  1776.  
  1777.                         (help #studio_addons_help)
  1778.  
  1779.                         (choices
  1780.  
  1781.                             #studio_addons_envwww
  1782.                             #studio_addons_envgde
  1783.                             #studio_addons_envthe
  1784.                             #studio_addons_envcpp
  1785.                             #studio_addons_envstm
  1786.                             #studio_addons_envsas
  1787.                         )   
  1788.  
  1789.                         (default 0)
  1790.                     )
  1791.                 )
  1792.  
  1793.                 (set studio_removeaddons_b
  1794.  
  1795.                     (askoptions
  1796.  
  1797.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_b))
  1798.  
  1799.                         (help #studio_addons_help)
  1800.  
  1801.                         (choices
  1802.  
  1803.                             #studio_addons_envasm
  1804.                             #studio_addons_envbat
  1805.                             #studio_addons_envfax
  1806.                             #studio_addons_envmdt
  1807.                             #studio_addons_envthr
  1808.                             #studio_addons_envjcy
  1809.                         )   
  1810.  
  1811.                         (default 0)
  1812.                     )
  1813.                 )
  1814.  
  1815.                 (set studio_removeaddons_c
  1816.  
  1817.                     (askoptions
  1818.  
  1819.                         (prompt (cat #studio_components_addons #studio_parts_uninstall_c))
  1820.  
  1821.                         (help #studio_addons_help)
  1822.  
  1823.                         (choices
  1824.  
  1825.                             #studio_addons_envprt
  1826.                             #studio_addons_envrcs
  1827.                             #studio_addons_envins
  1828.                         )   
  1829.  
  1830.                         (default 0)
  1831.                     )
  1832.                 )
  1833.             )
  1834.         )
  1835.  
  1836.         ; remove starter(s)
  1837.  
  1838.         (if (bitand studio_remove @studio_components_starter)
  1839.  
  1840.             (
  1841.                 (set studio_removestarter
  1842.  
  1843.                     (askoptions
  1844.  
  1845.                         (prompt (cat #studio_components_starter #studio_parts_uninstall))
  1846.  
  1847.                         (help #studio_starter_help)
  1848.  
  1849.                         (choices
  1850.  
  1851.                             #studio_starter_ed
  1852.                             #studio_starter_appicon
  1853.                         )
  1854.  
  1855.                         (default 0)
  1856.                     )
  1857.                 )
  1858.             )
  1859.         )
  1860.  
  1861.         ; remove documentation
  1862.  
  1863.         (if (bitand studio_remove @studio_components_docs)
  1864.  
  1865.             (
  1866.                 (set studio_removemanual
  1867.  
  1868.                     (askoptions
  1869.  
  1870.                         (prompt (cat #studio_components_docs #studio_parts_uninstall))
  1871.  
  1872.                         (help #studio_manual_help)
  1873.  
  1874.                         (choices
  1875.  
  1876.                             #studio_manual_history
  1877.                             #studio_manual_licence
  1878.                             #studio_manual_order
  1879.                             #studio_manual_english
  1880.                             #studio_manual_german
  1881.                         )   
  1882.  
  1883.                         (default 0)
  1884.                     )
  1885.                 )
  1886.             )
  1887.         )
  1888.     )
  1889. )
  1890.  
  1891. ; choose preferred language (input: <studio_language>, output: <studio_language>
  1892.  
  1893. (procedure studio_proc_chooselanguage
  1894.  
  1895.     (
  1896.         (while (not (exists ("installdata/locale/%s/standard.menu" studio_language)))
  1897.  
  1898.             (if (= @language "english") (set studio_locale 0))
  1899.             (if (= @language "deutsch") (set studio_locale 1))
  1900.  
  1901.             (set studio_locale
  1902.  
  1903.                 (askchoice
  1904.  
  1905.                     (prompt #studio_locale)
  1906.  
  1907.                     (help #studio_locale_help)
  1908.  
  1909.                     (choices
  1910.  
  1911.                         "English"
  1912.                         "Deutsch"
  1913.                     )
  1914.  
  1915.                     (default studio_locale)
  1916.                 )
  1917.             )
  1918.  
  1919.             (if (= studio_locale 0) (set studio_language "english"))
  1920.             (if (= studio_locale 1) (set studio_language "deutsch"))
  1921.         )
  1922.     )
  1923. )
  1924.  
  1925. ; install registry editor (input: none)
  1926.  
  1927. (procedure studio_proc_installregedit
  1928.  
  1929.     (
  1930.         (if (= studio_regedit "")
  1931.  
  1932.             (
  1933.                 (set studio_regedit "golded:add-ons/regedit/regedit")
  1934.  
  1935.                 (if (exists studio_regedit)
  1936.  
  1937.                     (
  1938.                         (set oldver (getversion studio_regedit))
  1939.  
  1940.                         (set newver (getversion "installdata/golded/add-ons/regedit/regedit"))
  1941.  
  1942.                         (if (> newver oldver)
  1943.  
  1944.                             (copyfiles
  1945.  
  1946.                                 (source "installdata/golded/add-ons/regedit")
  1947.  
  1948.                                 (dest "golded:add-ons/regedit")
  1949.  
  1950.                                 (all)
  1951.                             )
  1952.                         )
  1953.                     )
  1954.  
  1955.                     (copyfiles
  1956.  
  1957.                         (source "installdata/golded/add-ons/regedit")
  1958.  
  1959.                         (dest "golded:add-ons/regedit")
  1960.  
  1961.                         (all)
  1962.                     )
  1963.                 )
  1964.             )
  1965.         )
  1966.     )
  1967. )
  1968.  
  1969. ; check existing setup (input: <studio_path>, output: <studio_yourname>, <studio_serial>, <studio_components>)
  1970.  
  1971. (procedure studio_proc_checksetup
  1972.  
  1973.     (
  1974.         (working studio_checking)
  1975.  
  1976.         (makeassign "golded" studio_path)
  1977.  
  1978.         (if (exists "golded:" (noreq))
  1979.  
  1980.             (
  1981.                 ; read env variables from last installation
  1982.  
  1983.                 (if (exists "golded:etc/env")
  1984.  
  1985.                     (
  1986.                         (if (= (exists "golded:etc/env/name") 1)
  1987.  
  1988.                             (
  1989.                                 (run "installdata/programs/setenv NAME=NAME FROM=golded:etc/env/name")
  1990.  
  1991.                                 (set studio_yourname (getenv "NAME"))
  1992.                             )
  1993.                         )
  1994.  
  1995.                         (if (= (exists "golded:etc/env/language") 1)
  1996.  
  1997.                             (
  1998.                                 (run "installdata/programs/setenv NAME=LANGUAGE FROM=golded:etc/env/language")
  1999.  
  2000.                                 (set studio_language (getenv "LANGUAGE"))
  2001.                             )
  2002.                         )
  2003.  
  2004.                         (if (= (exists "golded:etc/env/serial") 1)
  2005.  
  2006.                             (
  2007.                                 (run "installdata/programs/setenv NAME=SERIAL FROM=golded:etc/env/serial")
  2008.  
  2009.                                 (set studio_serial (getenv "SERIAL"))
  2010.                             )
  2011.                         )
  2012.                     )
  2013.                 )
  2014.  
  2015.                 ; check installed components
  2016.  
  2017.                 (set studio_components 0)
  2018.                 (set studio_starter    0)
  2019.                 (set studio_manual     0)
  2020.                 (set studio_addons_a   0)
  2021.                 (set studio_addons_b   0)
  2022.                 (set studio_addons_c   0)
  2023.  
  2024.                 (if (exists "golded:demo")
  2025.  
  2026.                     (set studio_components (+ studio_components @studio_components_golded))
  2027.                 )
  2028.  
  2029.                 (if (exists "golded:ed")
  2030.  
  2031.                     (set studio_starter (+ studio_starter @studio_starter_ed))
  2032.                 )
  2033.  
  2034.                 (if (exists "golded:drag & drop")
  2035.  
  2036.                     (set studio_starter (+ studio_starter @studio_starter_appicon))
  2037.                 )
  2038.  
  2039.                 (if (<> studio_starter 0)
  2040.  
  2041.                     (set studio_components (+ studio_components @studio_components_starter))
  2042.                 )
  2043.  
  2044.                 (if (exists "golded:history")
  2045.  
  2046.                     (set studio_manual (+ studio_manual @studio_manual_history))
  2047.                 )
  2048.  
  2049.                 (if (exists "golded:licence")
  2050.  
  2051.                     (set studio_manual (+ studio_manual @studio_manual_licence))
  2052.                 )
  2053.  
  2054.                 (if (exists "golded:order")
  2055.  
  2056.                     (set studio_manual (+ studio_manual @studio_manual_order))
  2057.                 )
  2058.  
  2059.                 (if (exists "golded:manual")
  2060.  
  2061.                     (set studio_manual (+ studio_manual @studio_manual_english))
  2062.                 )
  2063.  
  2064.                 (if (exists "golded:anleitung")
  2065.  
  2066.                     (set studio_manual (+ studio_manual @studio_manual_german))
  2067.                 )
  2068.  
  2069.                 (if (<> 0 studio_manual)
  2070.  
  2071.                     (set studio_components (+ studio_components @studio_components_docs))
  2072.                 )
  2073.  
  2074.                 (if (exists "golded:add-ons/webworld")
  2075.  
  2076.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envwww))
  2077.                 )
  2078.  
  2079.                 (if (exists "golded:add-ons/makeguide")
  2080.  
  2081.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envgde))
  2082.                 )
  2083.  
  2084.                 (if (exists "golded:add-ons/thesaurus")
  2085.  
  2086.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envthe))
  2087.                 )
  2088.  
  2089.                 (if (exists "golded:add-ons/c++")
  2090.  
  2091.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envcpp))
  2092.                 )
  2093.  
  2094.                 (if (exists "golded:add-ons/stormc")
  2095.  
  2096.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envstm))
  2097.                 )
  2098.  
  2099.                 (if (exists "golded:add-ons/sas-c")
  2100.  
  2101.                     (set studio_addons_a (+ studio_addons_a @studio_addons_envsas))
  2102.                 )
  2103.  
  2104.                 (if (exists "golded:add-ons/a68k")
  2105.  
  2106.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envasm))
  2107.                 )
  2108.  
  2109.                 (if (exists "golded:add-ons/scripting")
  2110.  
  2111.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envbat))
  2112.                 )
  2113.  
  2114.                 (if (exists "golded:add-ons/fax")
  2115.  
  2116.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envfax))
  2117.                 )
  2118.  
  2119.                 (if (exists "golded:add-ons/microdot")
  2120.  
  2121.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envmdt))
  2122.                 )
  2123.  
  2124.                 (if (exists "golded:add-ons/thor")
  2125.  
  2126.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envthr))
  2127.                 )
  2128.  
  2129.                 (if (exists "golded:add-ons/joyce")
  2130.  
  2131.                     (set studio_addons_b (+ studio_addons_b @studio_addons_envjcy))
  2132.                 )
  2133.  
  2134.                 (if (exists "golded:add-ons/print")
  2135.  
  2136.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envprt))
  2137.                 )
  2138.  
  2139.                 (if (exists "golded:add-ons/rcs")
  2140.  
  2141.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envrcs))
  2142.                 )
  2143.  
  2144.                 (if (exists "golded:add-ons/installer")
  2145.  
  2146.                     (set studio_addons_c (+ studio_addons_c @studio_addons_envins))
  2147.                 )
  2148.  
  2149.                 (if (or (<> studio_addons_a 0) (<> studio_addons_b 0) (<> studio_addons_c 0))
  2150.  
  2151.                     (set studio_components (+ studio_components @studio_components_addons))
  2152.                 )
  2153.                 
  2154.                 (if (or (exists "golded:developer/api") (exists "golded:developer/catalogs") (exists "golded:developer/include") (exists "golded:developer/registry") (exists "golded:developer/scanner") (exists "golded:developer/source") (exists "golded:developer/syntax"))
  2155.                 
  2156.                     (set studio_components (+ studio_components @studio_components_developer))
  2157.                 )
  2158.                 
  2159.                 (if (exists "golded:screenshot")
  2160.                 
  2161.                     (set studio_components (+ studio_components @studio_components_screenshot))
  2162.                 )
  2163.                 
  2164.                 (if (exists "golded:recover")
  2165.                 
  2166.                     (set studio_components (+ studio_components @studio_components_recover))
  2167.                 )
  2168.             )
  2169.         )
  2170.     )
  2171. )
  2172.  
  2173. ; install presets (input: none)
  2174.  
  2175. (procedure studio_proc_installpresets
  2176.  
  2177.     (
  2178.         (set studio_preset_install_a
  2179.  
  2180.             (askoptions
  2181.  
  2182.                 (prompt #studio_preset_install_a)
  2183.  
  2184.                 (choices
  2185.  
  2186.                     #studio_preset_display     
  2187.                     #studio_preset_interface   
  2188.                     #studio_preset_hunter      
  2189.                     #studio_preset_printer     
  2190.                     #studio_preset_context
  2191.                     #studio_preset_syntax      
  2192.                     #studio_preset_layout      
  2193.                     #studio_preset_mouse       
  2194.                     #studio_preset_menu        
  2195.                 )
  2196.  
  2197.                 (default 0)
  2198.  
  2199.                 (help #studio_preset_install_help)
  2200.             )
  2201.         )
  2202.  
  2203.         (set studio_preset_install_b
  2204.  
  2205.             (askoptions
  2206.  
  2207.                 (prompt #studio_preset_install_b)
  2208.  
  2209.                 (choices
  2210.  
  2211.                     #studio_preset_api         
  2212.                     #studio_preset_project     
  2213.                     #studio_preset_references  
  2214.                     #studio_preset_gadgets     
  2215.                     #studio_preset_tabs        
  2216.                     #studio_preset_keyboard    
  2217.                     #studio_preset_templates   
  2218.                     #studio_preset_misc        
  2219.                     #studio_preset_dictionary  
  2220.                 )
  2221.  
  2222.                 (default 0)
  2223.  
  2224.                 (help #studio_preset_install_help)
  2225.             )
  2226.         )
  2227.  
  2228.         (if (or studio_preset_install_a studio_preset_install_b)
  2229.  
  2230.             (
  2231.                 (if (bitand studio_preset_install_a (+ @studio_preset_mouse @studio_preset_menu @studio_preset_gadgets))
  2232.  
  2233.                     (studio_proc_chooselanguage)
  2234.                 )
  2235.  
  2236.                 (if (bitand studio_preset_install_a @studio_preset_display)
  2237.  
  2238.                     (
  2239.                         (run ("%s PRESET installdata/locale/%s/standard.display" studio_regedit studio_language))
  2240.  
  2241.                         ; reset font
  2242.  
  2243.                         (run bin "installdata/programs/installfont file=golded:etc/registry/presets/standard.display")
  2244.                     )
  2245.                 )
  2246.  
  2247.                 (if (bitand studio_preset_install_a @studio_preset_interface)
  2248.  
  2249.                     (run ("%s PRESET installdata/registry/presets/standard.interface" studio_regedit))
  2250.                 )
  2251.  
  2252.                 (if (bitand studio_preset_install_a @studio_preset_hunter)
  2253.  
  2254.                     (run ("%s PRESET installdata/registry/presets/standard.hunter" studio_regedit))
  2255.                 )
  2256.  
  2257.                 (if (bitand studio_preset_install_a @studio_preset_printer)
  2258.  
  2259.                     (run ("%s PRESET installdata/registry/presets/standard.printer" studio_regedit))
  2260.                 )
  2261.  
  2262.                 (if (bitand studio_preset_install_a @studio_preset_context)
  2263.  
  2264.                     (run ("%s PRESET installdata/registry/presets/standard.context" studio_regedit))
  2265.                 )
  2266.  
  2267.                 (if (bitand studio_preset_install_a @studio_preset_syntax)
  2268.  
  2269.                     (run ("%s PRESET installdata/registry/presets/standard.syntax" studio_regedit))
  2270.                 )
  2271.  
  2272.                 (if (bitand studio_preset_install_a @studio_preset_layout)
  2273.  
  2274.                     (run ("%s PRESET installdata/registry/presets/standard.layout" studio_regedit))
  2275.                 )
  2276.  
  2277.                 (if (bitand studio_preset_install_a @studio_preset_mouse)
  2278.  
  2279.                     (run ("%s PRESET installdata/locale/%s/standard.mouse" studio_regedit studio_language))
  2280.                 )
  2281.  
  2282.                 (if (bitand studio_preset_install_a @studio_preset_menu)
  2283.  
  2284.                     (run ("%s PRESET installdata/locale/%s/standard.menu" studio_regedit studio_language))
  2285.                 )
  2286.  
  2287.                 (if (bitand studio_preset_install_b @studio_preset_api)
  2288.  
  2289.                     (run ("%s PRESET installdata/registry/presets/standard.api" studio_regedit))
  2290.                 )
  2291.  
  2292.                 (if (bitand studio_preset_install_b @studio_preset_project)
  2293.  
  2294.                     (run ("%s PRESET installdata/registry/presets/standard.project" studio_regedit))
  2295.                 )
  2296.  
  2297.                 (if (bitand studio_preset_install_b @studio_preset_references)
  2298.  
  2299.                     (run ("%s PRESET installdata/registry/presets/standard.references" studio_regedit))
  2300.                 )
  2301.  
  2302.                 (if (bitand studio_preset_install_b @studio_preset_gadgets)
  2303.  
  2304.                     (run ("%s PRESET installdata/locale/%s/standard.gadgets" studio_regedit studio_language))
  2305.                 )
  2306.  
  2307.                 (if (bitand studio_preset_install_b @studio_preset_tabs)
  2308.  
  2309.                     (run ("%s PRESET installdata/registry/presets/standard.tabs" studio_regedit))
  2310.                 )
  2311.  
  2312.                 (if (bitand studio_preset_install_b @studio_preset_keyboard)
  2313.  
  2314.                     (run ("%s PRESET installdata/registry/presets/standard.keyboard" studio_regedit))
  2315.                 )
  2316.  
  2317.                 (if (bitand studio_preset_install_b @studio_preset_templates)
  2318.  
  2319.                     (run ("%s PRESET installdata/registry/presets/standard.templates" studio_regedit))
  2320.                 )
  2321.  
  2322.                 (if (bitand studio_preset_install_b @studio_preset_misc)
  2323.  
  2324.                     (run ("%s PRESET installdata/registry/presets/standard.misc" studio_regedit))
  2325.                 )
  2326.  
  2327.                 (if (bitand studio_preset_install_b @studio_preset_dictionary)
  2328.  
  2329.                     (run ("%s PRESET installdata/registry/presets/standard.dictionary" studio_regedit))
  2330.                 )
  2331.             )
  2332.         )
  2333.  
  2334.         (run "installdata/programs/unprotect basedir=golded:etc/registry")
  2335.     )
  2336. )
  2337.  
  2338. ; install components (input: <studio_components>, <studio_starter>, <studio_manual>)
  2339.  
  2340. (procedure studio_proc_installcomponents
  2341.  
  2342.     (
  2343.         ; always install reqtools library
  2344.  
  2345.         (if (not (exists "golded:etc/libs/reqtools.library"))
  2346.  
  2347.             (
  2348.                 (copyfiles
  2349.  
  2350.                     (source "bonus/reqtools/reqtools.library")
  2351.  
  2352.                     (dest "golded:etc/libs")
  2353.                 )
  2354.  
  2355.                 (run "assign libs: golded:etc/libs add")
  2356.             )
  2357.         )
  2358.  
  2359.         ; install editor
  2360.  
  2361.         (if (bitand studio_components @studio_components_golded)
  2362.  
  2363.             (
  2364.                 ; always install 68000 binary (all other versions are optional and untested)
  2365.  
  2366.                 (set studio_cpu @studio_cpu_68000)
  2367.  
  2368.                 (if (= studio_cpu @studio_cpu_68000)
  2369.  
  2370.                     (set studio_binary "68000")
  2371.                 )
  2372.  
  2373.                 (if (= studio_cpu @studio_cpu_68020)
  2374.  
  2375.                     (set studio_binary "68020")
  2376.                 )
  2377.  
  2378.                 (if (= studio_cpu @studio_cpu_68030)
  2379.  
  2380.                     (set studio_binary "68030")
  2381.                 )
  2382.  
  2383.                 (if (= studio_cpu @studio_cpu_68040)
  2384.  
  2385.                     (set studio_binary "68040")
  2386.                 )
  2387.  
  2388.                 (if (= studio_cpu @studio_cpu_68060)
  2389.  
  2390.                     (set studio_binary "68060")
  2391.                 )
  2392.  
  2393.                 (copyfiles
  2394.  
  2395.                     (source (cat "installdata/cpu/" studio_binary "/Demo"))
  2396.  
  2397.                     (dest "golded:")
  2398.                 )
  2399.  
  2400.                 (copyfiles
  2401.  
  2402.                     (source "installdata/golded/Demo.info")
  2403.  
  2404.                     (dest "golded:")
  2405.                 )
  2406.  
  2407.                 (copyfiles
  2408.  
  2409.                     (source "installdata/golded/etc")
  2410.  
  2411.                     (dest "golded:etc")
  2412.  
  2413.                     (all)
  2414.                 )
  2415.  
  2416.                 (run "assign fonts: golded:etc/fonts add")
  2417.  
  2418.                 ; request reboot
  2419.  
  2420.                 (set studio_reboot 1)
  2421.             )
  2422.         )
  2423.  
  2424.         ; install presets and registry
  2425.  
  2426.         (if (bitand studio_components @studio_components_config)
  2427.  
  2428.             (
  2429.                 (studio_proc_chooselanguage)
  2430.  
  2431.                 (run ("%s PRESET installdata/registry/presets/standard.interface"  studio_regedit))
  2432.                 (run ("%s PRESET installdata/registry/presets/standard.hunter"     studio_regedit))
  2433.                 (run ("%s PRESET installdata/registry/presets/standard.printer"    studio_regedit))
  2434.                 (run ("%s PRESET installdata/registry/presets/standard.context"    studio_regedit))
  2435.                 (run ("%s PRESET installdata/registry/presets/standard.syntax"     studio_regedit))
  2436.                 (run ("%s PRESET installdata/registry/presets/standard.layout"     studio_regedit))
  2437.                 (run ("%s PRESET installdata/registry/presets/standard.api"        studio_regedit))
  2438.                 (run ("%s PRESET installdata/registry/presets/standard.project"    studio_regedit))
  2439.                 (run ("%s PRESET installdata/registry/presets/standard.references" studio_regedit))
  2440.                 (run ("%s PRESET installdata/registry/presets/standard.tabs"       studio_regedit))
  2441.                 (run ("%s PRESET installdata/registry/presets/standard.keyboard"   studio_regedit))
  2442.                 (run ("%s PRESET installdata/registry/presets/standard.templates"  studio_regedit))
  2443.                 (run ("%s PRESET installdata/registry/presets/standard.misc"       studio_regedit))
  2444.                 (run ("%s PRESET installdata/registry/presets/standard.dictionary" studio_regedit))
  2445.  
  2446.                 ; localized presets
  2447.  
  2448.                 (run ("%s PRESET installdata/locale/%s/standard.mouse  " studio_regedit studio_language))
  2449.                 (run ("%s PRESET installdata/locale/%s/standard.menu   " studio_regedit studio_language))
  2450.                 (run ("%s PRESET installdata/locale/%s/standard.gadgets" studio_regedit studio_language))
  2451.                 (run ("%s PRESET installdata/locale/%s/standard.display" studio_regedit studio_language))
  2452.  
  2453.                 ; choose a font
  2454.  
  2455.                 (run bin "installdata/programs/installfont file=golded:etc/registry/presets/standard.display")
  2456.  
  2457.                 ; install registry
  2458.  
  2459.                 (copyfiles
  2460.  
  2461.                     (source "installdata/registry/registry")
  2462.  
  2463.                     (dest "golded:etc/registry")
  2464.                 )
  2465.  
  2466.                 ; remove write protection for material copied from CD-ROM
  2467.  
  2468.                 (run "installdata/programs/unprotect basedir=golded:etc/registry")
  2469.  
  2470.                 ; save install path and serial code in registry
  2471.  
  2472.                 (run ("golded:add-ons/regedit/regedit SERIAL=\"%s\" INSTALLPATH=\"%s\"" studio_serial (expandpath "")))
  2473.             )
  2474.         )
  2475.  
  2476.         ; install starters
  2477.  
  2478.         (if (bitand studio_components @studio_components_starter)
  2479.  
  2480.             (
  2481.                 (if (bitand studio_starter @studio_starter_ed)
  2482.  
  2483.                     (copyfiles
  2484.  
  2485.                         (source "installdata/golded/ed")
  2486.  
  2487.                         (dest "golded:")
  2488.                     )
  2489.                 )
  2490.  
  2491.                 (if (bitand studio_starter @studio_starter_appicon)
  2492.  
  2493.                     (
  2494.                         (copyfiles
  2495.  
  2496.                             (source "installdata/golded/Drag & Drop")
  2497.  
  2498.                             (dest "golded:")
  2499.                         )
  2500.  
  2501.                         (copyfiles
  2502.  
  2503.                             (source "installdata/golded/Drag & Drop.info")
  2504.  
  2505.                             (dest "golded:")
  2506.                         )
  2507.                     )
  2508.                 )
  2509.             )
  2510.         )
  2511.  
  2512.         ; install documentation
  2513.  
  2514.         (if (bitand studio_components @studio_components_docs)
  2515.  
  2516.             (
  2517.                 (if (bitand studio_manual @studio_manual_history)
  2518.  
  2519.                     (copyfiles
  2520.  
  2521.                         (source "installdata/golded/history")
  2522.  
  2523.                         (dest "golded:")
  2524.                     )
  2525.                 )
  2526.  
  2527.                 (if (bitand studio_manual @studio_manual_licence)
  2528.  
  2529.                     (
  2530.                         (copyfiles
  2531.  
  2532.                             (source "installdata/golded/Licence")
  2533.  
  2534.                             (dest "golded:")
  2535.                         )
  2536.  
  2537.                         (copyfiles
  2538.  
  2539.                             (source "installdata/golded/Licence.info")
  2540.  
  2541.                             (dest "golded:")
  2542.                         )
  2543.                     )
  2544.                 )
  2545.  
  2546.                 (if (bitand studio_manual @studio_manual_order)
  2547.  
  2548.                     (
  2549.                         (copyfiles
  2550.  
  2551.                             (source "installdata/golded/Order")
  2552.  
  2553.                             (dest "golded:")
  2554.                         )
  2555.  
  2556.                         (copyfiles
  2557.  
  2558.                             (source "installdata/golded/Order.info")
  2559.  
  2560.                             (dest "golded:")
  2561.                         )
  2562.                     )
  2563.                 )
  2564.  
  2565.                 (if (bitand studio_manual @studio_manual_english)
  2566.  
  2567.                     (
  2568.                         (copyfiles
  2569.  
  2570.                             (source "installdata/golded/Manual")
  2571.  
  2572.                             (dest "golded:")
  2573.                         )
  2574.  
  2575.                         (copyfiles
  2576.  
  2577.                             (source "installdata/golded/Manual.info")
  2578.  
  2579.                             (dest "golded:")
  2580.                         )
  2581.                     )
  2582.                 )
  2583.  
  2584.                 (if (bitand studio_manual @studio_manual_german)
  2585.  
  2586.                     (
  2587.                         (copyfiles
  2588.  
  2589.                             (source "installdata/golded/Anleitung")
  2590.  
  2591.                             (dest "golded:")
  2592.                         )
  2593.  
  2594.                         (copyfiles
  2595.  
  2596.                             (source "installdata/golded/Anleitung.info")
  2597.  
  2598.                             (dest "golded:")
  2599.                         )
  2600.                     )
  2601.                 )
  2602.             )
  2603.         )
  2604.  
  2605.         ; install screenshot
  2606.  
  2607.         (if (bitand studio_components @studio_components_screenshot)
  2608.  
  2609.             (
  2610.                 (copyfiles
  2611.  
  2612.                     (source "installdata/golded/Screenshot")
  2613.  
  2614.                     (dest "golded:")
  2615.                 )
  2616.  
  2617.                 (copyfiles
  2618.  
  2619.                     (source "installdata/golded/Screenshot.info")
  2620.  
  2621.                     (dest "golded:")
  2622.                 )
  2623.             )
  2624.         )
  2625.  
  2626.         ; install developer material
  2627.  
  2628.         (if (bitand studio_components @studio_components_developer)
  2629.  
  2630.             (
  2631.                 (makedir "golded:developer")
  2632.  
  2633.                 (copyfiles
  2634.  
  2635.                     (source "installdata/golded/developer")
  2636.  
  2637.                     (dest "golded:developer")
  2638.  
  2639.                     (all)
  2640.                 )
  2641.             )
  2642.         )
  2643.  
  2644.         ; install recovery program
  2645.  
  2646.         (if (bitand studio_components @studio_components_recover)
  2647.  
  2648.             (
  2649.                 (copyfiles
  2650.  
  2651.                     (source "installdata/golded/Recover")
  2652.  
  2653.                     (dest "golded:")
  2654.                 )
  2655.  
  2656.                 (copyfiles
  2657.  
  2658.                     (source "installdata/golded/Recover.info")
  2659.  
  2660.                     (dest "golded:")
  2661.                 )
  2662.             )
  2663.         )
  2664.  
  2665.         ; install add-onds (to-do)
  2666.  
  2667.         (if (bitand studio_components @studio_components_addons)
  2668.  
  2669.             (
  2670.                 (working #studio_addons_install)
  2671.  
  2672.                 (if (bitand studio_addons_a @studio_addons_envwww)
  2673.  
  2674.                     (
  2675.                         (set studio_installpath "installdata/golded/add-ons/envWWW28/setup")
  2676.  
  2677.                         (studio_proc_install)
  2678.                     )
  2679.                 )
  2680.  
  2681.                 (if (bitand studio_addons_a @studio_addons_envgde)
  2682.  
  2683.                     (
  2684.                         (set studio_installpath "installdata/golded/add-ons/envGDE15/setup")
  2685.  
  2686.                         (studio_proc_install)
  2687.                     )
  2688.                 )
  2689.  
  2690.                 (if (bitand studio_addons_a @studio_addons_envthe)
  2691.  
  2692.                     (
  2693.                         (set studio_installpath "installdata/golded/add-ons/envTHE10/setup")
  2694.  
  2695.                         (studio_proc_install)
  2696.                     )
  2697.                 )
  2698.  
  2699.                 (if (bitand studio_addons_a @studio_addons_envcpp)
  2700.  
  2701.                     (
  2702.                         (set studio_installpath "installdata/golded/add-ons/envCPP25/setup")
  2703.  
  2704.                         (studio_proc_install)
  2705.                     )
  2706.                 )
  2707.  
  2708.                 (if (bitand studio_addons_a @studio_addons_envstm)
  2709.  
  2710.                     (
  2711.                         (set studio_installpath "installdata/golded/add-ons/envSTM25/setup")
  2712.  
  2713.                         (studio_proc_install)
  2714.                     )
  2715.                 )
  2716.  
  2717.                 (if (bitand studio_addons_a @studio_addons_envsas)
  2718.  
  2719.                     (
  2720.                         (set studio_installpath "installdata/golded/add-ons/envSAS10/setup")
  2721.  
  2722.                         (studio_proc_install)
  2723.                     )
  2724.                 )
  2725.  
  2726.                 (if (bitand studio_addons_b @studio_addons_envasm)
  2727.  
  2728.                     (
  2729.                         (set studio_installpath "installdata/golded/add-ons/envASM13/setup")
  2730.  
  2731.                         (studio_proc_install)
  2732.                     )
  2733.                 )
  2734.  
  2735.                 (if (bitand studio_addons_b @studio_addons_envbat)
  2736.  
  2737.                     (
  2738.                         (set studio_installpath "installdata/golded/add-ons/envBAT13/setup")
  2739.  
  2740.                         (studio_proc_install)
  2741.                     )
  2742.                 )
  2743.  
  2744.                 (if (bitand studio_addons_b @studio_addons_envfax)
  2745.  
  2746.                     (
  2747.                         (set studio_installpath "installdata/golded/add-ons/envFAX10/setup")
  2748.  
  2749.                         (studio_proc_install)
  2750.                     )
  2751.                 )
  2752.  
  2753.                 (if (bitand studio_addons_b @studio_addons_envmdt)
  2754.  
  2755.                     (
  2756.                         (set studio_installpath "installdata/golded/add-ons/envMDT23/setup")
  2757.  
  2758.                         (studio_proc_install)
  2759.                     )
  2760.                 )
  2761.  
  2762.                 (if (bitand studio_addons_b @studio_addons_envthr)
  2763.  
  2764.                     (
  2765.                         (set studio_installpath "installdata/golded/add-ons/envTHR10/setup")
  2766.  
  2767.                         (studio_proc_install)
  2768.                     )
  2769.                 )
  2770.  
  2771.                 (if (bitand studio_addons_b @studio_addons_envjcy)
  2772.  
  2773.                     (
  2774.                         (set studio_installpath "installdata/golded/add-ons/envJCY50/setup")
  2775.  
  2776.                         (studio_proc_install)
  2777.                     )
  2778.                 )
  2779.  
  2780.                 (if (bitand studio_addons_c @studio_addons_envprt)
  2781.  
  2782.                     (
  2783.                         (set studio_installpath "installdata/golded/add-ons/envPRT63/setup")
  2784.  
  2785.                         (studio_proc_install)
  2786.                     )
  2787.                 )
  2788.  
  2789.                 (if (bitand studio_addons_c @studio_addons_envrcs)
  2790.  
  2791.                     (
  2792.                         (set studio_installpath "installdata/golded/add-ons/envRCS11/setup")
  2793.  
  2794.                         (studio_proc_install)
  2795.                     )
  2796.                 )
  2797.  
  2798.                 (if (bitand studio_addons_c @studio_addons_envins)
  2799.  
  2800.                     (
  2801.                         (set studio_installpath "installdata/golded/add-ons/envINS10/setup")
  2802.  
  2803.                         (studio_proc_install)
  2804.                     )
  2805.                 )
  2806.             )
  2807.         )
  2808.  
  2809.         (run "installdata/programs/unprotect basedir=golded:")
  2810.     )
  2811. )
  2812.  
  2813. ; remove components (input: <studio_remove>)
  2814.  
  2815. (procedure studio_proc_removecomponents
  2816.  
  2817.     (
  2818.         ; remove editor
  2819.  
  2820.         (if (bitand studio_remove @studio_components_golded)
  2821.  
  2822.             (delete "golded:demo")
  2823.         )
  2824.  
  2825.         ; remove starters
  2826.  
  2827.         (if (bitand studio_remove @studio_components_starter)
  2828.  
  2829.             (
  2830.                 (if (bitand studio_removestarter @studio_starter_ed)
  2831.  
  2832.                     (delete "golded:ed")
  2833.                 )
  2834.  
  2835.                 (if (bitand studio_removestarter @studio_starter_appicon)
  2836.  
  2837.                     (delete "golded:drag & drop")
  2838.                 )
  2839.             )
  2840.         )
  2841.  
  2842.         ; remove documentation
  2843.  
  2844.         (if (bitand studio_remove @studio_components_docs)
  2845.  
  2846.             (
  2847.                 (if (bitand studio_removemanual @studio_manual_history)
  2848.  
  2849.                     (delete "golded:history")
  2850.                 )
  2851.  
  2852.                 (if (bitand studio_removemanual @studio_manual_licence)
  2853.  
  2854.                     (delete "golded:licence")
  2855.                 )
  2856.  
  2857.                 (if (bitand studio_removemanual @studio_manual_order)
  2858.  
  2859.                     (delete "golded:order")
  2860.                 )
  2861.  
  2862.                 (if (bitand studio_removemanual @studio_manual_english)
  2863.  
  2864.                     (delete "golded:manual")
  2865.                 )
  2866.  
  2867.                 (if (bitand studio_removemanual @studio_manual_german)
  2868.  
  2869.                     (delete "golded:anleitung")
  2870.                 )
  2871.             )
  2872.         )
  2873.  
  2874.         ; remove developer material
  2875.  
  2876.         (if (bitand studio_remove @studio_components_developer)
  2877.  
  2878.             ("run delete golded:developer all quiet")
  2879.         )
  2880.  
  2881.         ; remove screenshot
  2882.  
  2883.         (if (bitand studio_remove @studio_components_screenshot)
  2884.  
  2885.             (delete "golded:screenshot")
  2886.         )
  2887.  
  2888.         ; remove recovery program
  2889.  
  2890.         (if (bitand studio_remove @studio_components_recover)
  2891.  
  2892.             (delete "golded:recover")
  2893.         )
  2894.  
  2895.         ; remove add-ons
  2896.  
  2897.         (if (bitand studio_remove @studio_components_addons)
  2898.  
  2899.             (
  2900.                 (if (bitand studio_removeaddons_a @studio_addons_envwww)
  2901.  
  2902.                     (
  2903.                         (set studio_installpath "installdata/golded/add-ons/envWWW28/setup")
  2904.  
  2905.                         (studio_proc_uninstall)
  2906.                     )
  2907.                 )
  2908.  
  2909.                 (if (bitand studio_removeaddons_a @studio_addons_envgde)
  2910.  
  2911.                     (
  2912.                         (set studio_installpath "installdata/golded/add-ons/envGDE15/setup")
  2913.  
  2914.                         (studio_proc_uninstall)
  2915.                     )
  2916.                 )
  2917.  
  2918.                 (if (bitand studio_removeaddons_a @studio_addons_envthe)
  2919.  
  2920.                     (
  2921.                         (set studio_installpath "installdata/golded/add-ons/envTHE10/setup")
  2922.  
  2923.                         (studio_proc_uninstall)
  2924.                     )
  2925.                 )
  2926.  
  2927.                 (if (bitand studio_removeaddons_a @studio_addons_envcpp)
  2928.  
  2929.                     (
  2930.                         (set studio_installpath "installdata/golded/add-ons/envCPP25/setup")
  2931.  
  2932.                         (studio_proc_uninstall)
  2933.                     )
  2934.                 )
  2935.  
  2936.                 (if (bitand studio_removeaddons_a @studio_addons_envstm)
  2937.  
  2938.                     (
  2939.                         (set studio_installpath "installdata/golded/add-ons/envSTM25/setup")
  2940.  
  2941.                         (studio_proc_uninstall)
  2942.                     )
  2943.                 )
  2944.  
  2945.                 (if (bitand studio_removeaddons_a @studio_addons_envsas)
  2946.  
  2947.                     (
  2948.                         (set studio_installpath "installdata/golded/add-ons/envSAS10/setup")
  2949.  
  2950.                         (studio_proc_uninstall)
  2951.                     )
  2952.                 )
  2953.  
  2954.                 (if (bitand studio_removeaddons_b @studio_addons_envasm)
  2955.  
  2956.                     (
  2957.                         (set studio_installpath "installdata/golded/add-ons/envASM13/setup")
  2958.  
  2959.                         (studio_proc_uninstall)
  2960.                     )
  2961.                 )
  2962.  
  2963.                 (if (bitand studio_removeaddons_b @studio_addons_envbat)
  2964.  
  2965.                     (
  2966.                         (set studio_installpath "installdata/golded/add-ons/envBAT13/setup")
  2967.  
  2968.                         (studio_proc_uninstall)
  2969.                     )
  2970.                 )
  2971.  
  2972.                 (if (bitand studio_removeaddons_b @studio_addons_envfax)
  2973.  
  2974.                     (
  2975.                         (set studio_installpath "installdata/golded/add-ons/envFAX10/setup")
  2976.  
  2977.                         (studio_proc_uninstall)
  2978.                     )
  2979.                 )
  2980.  
  2981.                 (if (bitand studio_removeaddons_b @studio_addons_envmdt)
  2982.  
  2983.                     (
  2984.                         (set studio_installpath "installdata/golded/add-ons/envMDT23/setup")
  2985.  
  2986.                         (studio_proc_uninstall)
  2987.                     )
  2988.                 )
  2989.  
  2990.                 (if (bitand studio_removeaddons_b @studio_addons_envthr)
  2991.  
  2992.                     (
  2993.                         (set studio_installpath "installdata/golded/add-ons/envTHR10/setup")
  2994.  
  2995.                         (studio_proc_uninstall)
  2996.                     )
  2997.                 )
  2998.  
  2999.                 (if (bitand studio_removeaddons_b @studio_addons_envjcy)
  3000.  
  3001.                     (
  3002.                         (set studio_installpath "installdata/golded/add-ons/envJCY50/setup")
  3003.  
  3004.                         (studio_proc_uninstall)
  3005.                     )
  3006.                 )
  3007.  
  3008.                 (if (bitand studio_removeaddons_c @studio_addons_envprt)
  3009.  
  3010.                     (
  3011.                         (set studio_installpath "installdata/golded/add-ons/envPRT63/setup")
  3012.  
  3013.                         (studio_proc_uninstall)
  3014.                     )
  3015.                 )
  3016.  
  3017.                 (if (bitand studio_removeaddons_c @studio_addons_envrcs)
  3018.  
  3019.                     (
  3020.                         (set studio_installpath "installdata/golded/add-ons/envRCS11/setup")
  3021.  
  3022.                         (studio_proc_uninstall)
  3023.                     )
  3024.                 )
  3025.  
  3026.                 (if (bitand studio_removeaddons_c @studio_addons_envins)
  3027.  
  3028.                     (
  3029.                         (set studio_installpath "installdata/golded/add-ons/envINS10/setup")
  3030.  
  3031.                         (studio_proc_uninstall)
  3032.                     )
  3033.                 )
  3034.             )
  3035.         )
  3036.     )
  3037. )
  3038.  
  3039. ; ------------------------------ error handling --------------------------------
  3040.  
  3041. (onerror
  3042.  
  3043.     (studio_proc_cleanup)
  3044.  
  3045.     (if (> @ioerr 0) 
  3046.  
  3047.         (
  3048.             ; set return code
  3049.  
  3050.             (delete "env:studioinstall")
  3051.  
  3052.             (textfile
  3053.  
  3054.                 (dest "env:studioinstall")
  3055.  
  3056.                 (append "INSTALLERROR")
  3057.             )
  3058.  
  3059.             (message
  3060.  
  3061.                 (cat #studio_installerror @ioerr)
  3062.             )
  3063.         )
  3064.     )
  3065.  
  3066.     (exit (quiet))
  3067. )
  3068.  
  3069. ; ------------------- check return code of previous installation ---------------
  3070.  
  3071. (if (exists "env:studioinstall" (noreq))
  3072.  
  3073.     ; (getenv) may not be used without checking if var exists (installer bug)
  3074.  
  3075.     (set studio_install_code
  3076.  
  3077.         (getenv "studioinstall")
  3078.     )
  3079.  
  3080.     (set studio_install_code "OK")
  3081. )
  3082.  
  3083. (if (= studio_install_code "INSTALLERROR")
  3084.  
  3085.     (
  3086.         (message #studio_notify)
  3087.     )
  3088. )
  3089.  
  3090. (delete "env:studioinstall")
  3091.  
  3092. (textfile
  3093.  
  3094.     (dest "env:studioinstall")
  3095.  
  3096.     (append "INCOMPLETE")
  3097. )
  3098.  
  3099. ; ----------------------------- find old installation --------------------------
  3100.  
  3101. (if (exists "golded:" (noreq))
  3102.  
  3103.     (
  3104.         (set studio_installdir (pathonly (expandpath "golded:")))
  3105.  
  3106.         (if (exists "golded:etc/registry")
  3107.  
  3108.             (set studio_found
  3109.  
  3110.                 (askbool
  3111.  
  3112.                     (prompt #studio_found)
  3113.  
  3114.                     (choices
  3115.  
  3116.                         #studio_found_confirm
  3117.                         #studio_found_newinstall
  3118.                     )
  3119.  
  3120.                     (help #studio_found_help)
  3121.                 )
  3122.             )
  3123.         )
  3124.     )
  3125.  
  3126.     (if (exists "work:" (noreq))
  3127.  
  3128.         (set studio_installdir "work:")
  3129.         (set studio_installdir "sys:")
  3130.     )
  3131. )
  3132.  
  3133. ; ---------------------------------- welcome -----------------------------------
  3134.  
  3135. (if (not (exists "env:" (noreq)))
  3136.  
  3137.     (
  3138.         (makedir "ram:env")
  3139.  
  3140.         (makeassign "env" "ram:")
  3141.     )
  3142. )
  3143.  
  3144. (if (= studio_found @studio_missing)
  3145.  
  3146.     (
  3147.         (message #studio_welcome)
  3148.  
  3149.         (welcome)
  3150.     )
  3151. )
  3152.  
  3153. (run "run <>NIL: installdata/programs/stopgolded")
  3154.  
  3155. ; --------------------------------- choose a path ------------------------------
  3156.  
  3157. ; create installation directory and temporary assign
  3158.  
  3159. (while (= studio_path "")
  3160.  
  3161.     (if (= studio_found @studio_found)
  3162.  
  3163.         (set studio_path (expandpath "golded:"))
  3164.  
  3165.         (
  3166.             ; keep requesting path until valid choice is made
  3167.  
  3168.             (set studio_repeat 1)
  3169.  
  3170.             (while (= studio_repeat 1)
  3171.  
  3172.                 (set studio_installdir
  3173.  
  3174.                     (askdir
  3175.  
  3176.                         (prompt #studio_path_choose)
  3177.  
  3178.                         (help #studio_path_choose_help)
  3179.  
  3180.                         (default studio_installdir)
  3181.                     )
  3182.                 )
  3183.  
  3184.                 (if (exists studio_installdir)
  3185.  
  3186.                     (set studio_repeat 0)
  3187.                     (set studio_repeat 1)
  3188.                 )
  3189.             )
  3190.  
  3191.             (set studio_path (tackon studio_installdir "Studio"))
  3192.  
  3193.             (if (exists studio_path)
  3194.  
  3195.                 (
  3196.                     (set studio_overwrite
  3197.  
  3198.                         (askbool
  3199.  
  3200.                             (prompt #studio_overwrite)
  3201.  
  3202.                             (choices
  3203.  
  3204.                                 #studio_overwrite_install
  3205.                                 #studio_overwrite_cancel
  3206.                             )
  3207.  
  3208.                             (help #studio_overwrite_help)
  3209.                         )
  3210.                     )
  3211.  
  3212.                     (if (= studio_overwrite 0)
  3213.  
  3214.                         (set studio_path "")
  3215.                     )
  3216.                 )
  3217.             )
  3218.         )
  3219.     )
  3220.  
  3221.     (if (<> studio_path "")
  3222.  
  3223.         (
  3224.             (set @default-dest studio_path)
  3225.  
  3226.             ; check existing installation
  3227.  
  3228.             (if (exists studio_path (noreq))
  3229.  
  3230.                 (
  3231.                     ; fairly complete installation ?
  3232.  
  3233.                     (if (and (exists (tackon studio_path "demo")) (exists (tackon studio_path "etc/registry/registry")))
  3234.  
  3235.                         (
  3236.                             (set studio_update studio_path)
  3237.  
  3238.                             (studio_proc_checksetup)
  3239.                         )
  3240.  
  3241.                         (
  3242.                             ; repeat full initial installation
  3243.  
  3244.                             (set studio_update "")
  3245.                         )
  3246.                     )
  3247.                 )
  3248.  
  3249.                 (makedir studio_path)
  3250.             )
  3251.  
  3252.             ; create assign
  3253.  
  3254.             (makeassign "golded" studio_path)
  3255.  
  3256.             ; verify assign
  3257.  
  3258.             (if (not (exists "golded:" (noreq)))
  3259.  
  3260.                 (
  3261.                     (set studio_path "")
  3262.  
  3263.                     (set studio_found @studio_missing)
  3264.                 )
  3265.             )
  3266.         )
  3267.     )
  3268. )
  3269.  
  3270. ; install drawer icon
  3271.  
  3272. (set studio_drawer (cat studio_path ".info"))
  3273.  
  3274. (if (not (exists studio_drawer))
  3275.  
  3276.     (
  3277.         (copyfiles
  3278.  
  3279.             (source "installdata/workbench/drawer.info")
  3280.  
  3281.             (dest studio_installdir)
  3282.  
  3283.             (newname (fileonly studio_drawer))
  3284.         )
  3285.  
  3286.         (tooltype
  3287.  
  3288.             (dest studio_drawer)
  3289.  
  3290.             (noposition)
  3291.         )
  3292.     )
  3293. )
  3294.  
  3295. ; validate directory structure
  3296.  
  3297. (makedir "golded:add-ons")
  3298. (makedir "golded:add-ons/regedit")
  3299. (makedir "golded:etc")
  3300. (makedir "golded:etc/api")
  3301. (makedir "golded:etc/autorun")
  3302. (makedir "golded:etc/catalogs")
  3303. (makedir "golded:etc/charsets")
  3304. (makedir "golded:etc/env")
  3305. (makedir "golded:etc/fonts")
  3306. (makedir "golded:etc/images")
  3307. (makedir "golded:etc/images/sys")
  3308. (makedir "golded:etc/images/toolbar")
  3309. (makedir "golded:etc/images/wb")
  3310. (makedir "golded:etc/libs")
  3311. (makedir "golded:etc/recordings")
  3312. (makedir "golded:etc/registry")
  3313. (makedir "golded:etc/registry/presets")
  3314. (makedir "golded:etc/rexx")
  3315. (makedir "golded:etc/scanner")
  3316. (makedir "golded:etc/sessions")
  3317. (makedir "golded:etc/syntax")
  3318. (makedir "golded:etc/uninstall")
  3319. (makedir "golded:etc/updates")
  3320. (makedir "golded:etc/xref")
  3321.  
  3322. ; always update registry editor
  3323.  
  3324. (studio_proc_installregedit)
  3325.  
  3326. ; ---------------------------------- register ----------------------------------
  3327.  
  3328. (if (or (= studio_yourname "") (= studio_serial ""))
  3329.  
  3330.     (while (= studio_registered 0)
  3331.  
  3332.         (set studio_repeat 1)
  3333.  
  3334.         (while (= studio_repeat 1)
  3335.  
  3336.             (set studio_yourname
  3337.  
  3338.                 (askstring
  3339.  
  3340.                     (prompt  #studio_yourname)
  3341.                     (help    #studio_yourname_help)
  3342.                     (default studio_yourname)
  3343.                 )
  3344.             )
  3345.  
  3346.             (if (= studio_yourname "")
  3347.  
  3348.                 (message #studio_yourname_help)
  3349.             )
  3350.  
  3351.             (if (= studio_yourname "")
  3352.  
  3353.                 (set studio_repeat 1)
  3354.                 (set studio_repeat 0)
  3355.             )
  3356.         )
  3357.  
  3358.         (set studio_repeat 1)
  3359.  
  3360.         (set studio_registered
  3361.  
  3362.             (askbool
  3363.  
  3364.                 (prompt (#studio_check studio_yourname))
  3365.  
  3366.                 (choices
  3367.  
  3368.                     #studio_check_continue
  3369.                     #studio_check_repeat
  3370.                 )
  3371.  
  3372.                 (help @askbool-help)
  3373.             )
  3374.         )
  3375.     )
  3376. )
  3377.  
  3378. ; ------------------------------- choose installation mode ---------------------
  3379.  
  3380. (set studio_installtype @studio_installtype_normal)
  3381.  
  3382. ; new installation ?
  3383.  
  3384. (if (= studio_update "")
  3385.  
  3386.     (set studio_installtype
  3387.  
  3388.         (askchoice
  3389.  
  3390.             (prompt #studio_installtype)
  3391.  
  3392.             (choices
  3393.  
  3394.                 #studio_installtype_minimum
  3395.                 #studio_installtype_user
  3396.                 #studio_installtype_normal
  3397.             )
  3398.  
  3399.             (help #studio_installtype_help)
  3400.  
  3401.             (default studio_installtype)
  3402.         )
  3403.     )
  3404. )
  3405.  
  3406. ; --------------------------------- choose components --------------------------
  3407.  
  3408. (if (= studio_update "")
  3409.  
  3410.     ; install new
  3411.  
  3412.     (
  3413.         (if (= studio_installtype @studio_installtype_minimum)
  3414.  
  3415.             (
  3416.                 (set studio_components @studio_components_golded)
  3417.                 (set studio_starter    0)
  3418.                 (set studio_manual     0)
  3419.                 (set studio_addons_a   0)
  3420.                 (set studio_addons_b   0)
  3421.                 (set studio_addons_c   0)
  3422.             )
  3423.  
  3424.             ; typical installation
  3425.  
  3426.             (
  3427.                 (set studio_components (- @studio_components_all @studio_components_addons))
  3428.                 (set studio_starter    @studio_components_all)
  3429.                 (set studio_manual     @studio_components_all)
  3430.                 (set studio_addons_a   0)
  3431.                 (set studio_addons_b   0)
  3432.                 (set studio_addons_c   0)
  3433.             )
  3434.         )
  3435.  
  3436.         (if (= studio_installtype @studio_installtype_user)
  3437.  
  3438.             (
  3439.                 ; choose categories
  3440.  
  3441.                 (set studio_components
  3442.  
  3443.                     (askoptions
  3444.  
  3445.                         (prompt #studio_components_install)
  3446.  
  3447.                         (choices
  3448.  
  3449.                             #studio_components_golded
  3450.                             #studio_components_starter
  3451.                             #studio_components_docs
  3452.                             #studio_components_addons
  3453.                             #studio_components_developer
  3454.                             #studio_components_screenshot
  3455.                             #studio_components_recover
  3456.                         )
  3457.  
  3458.                         (help #studio_components_help)
  3459.  
  3460.                         (default studio_components)
  3461.                     )
  3462.                 )
  3463.  
  3464.                 ; choose subcategories
  3465.  
  3466.                 (studio_proc_chooseparts)
  3467.             )
  3468.         )
  3469.  
  3470.         ; always install presets and registry when installing the editor
  3471.  
  3472.         (if (bitand studio_components @studio_components_golded)
  3473.  
  3474.             (
  3475.                 (studio_proc_chooselanguage)
  3476.  
  3477.                 (set studio_components (bitor studio_components @studio_components_config))
  3478.             )
  3479.         )
  3480.  
  3481.         ; edit user-startup
  3482.  
  3483.         (studio_proc_startup)
  3484.  
  3485.         ; install everything
  3486.  
  3487.         (studio_proc_installcomponents)
  3488.  
  3489.         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files Demo \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3490.  
  3491.         ; install autorun macro
  3492.  
  3493.         (copyfiles
  3494.  
  3495.             (source "installdata/autorun/golded.rexx")
  3496.  
  3497.             (dest "golded:etc/autorun")
  3498.         )
  3499.  
  3500.         (run "golded:add-ons/regedit/regedit autorunrexx golded:etc/autorun/golded.rexx autodelete")
  3501.     )
  3502.  
  3503.     ; install over old installation
  3504.  
  3505.     (
  3506.         ; keep showing update menu
  3507.  
  3508.         (while (<> studio_updatemode @updatemode_exit)
  3509.  
  3510.             (
  3511.                 (set studio_updatemode
  3512.  
  3513.                     (askchoice
  3514.  
  3515.                         (prompt studio_path)
  3516.  
  3517.                         (choices
  3518.  
  3519.                             #studio_updatemode_reinstall
  3520.                             #studio_updatemode_add
  3521.                             #studio_updatemode_remove
  3522.                             #studio_updatemode_presets
  3523.                             #studio_updatemode_registry
  3524.                             #studio_updatemode_startup
  3525.                             #studio_updatemode_exit
  3526.                         )
  3527.  
  3528.                         (default studio_updatemode)
  3529.  
  3530.                         (help #studio_updatemode_help)
  3531.                     )
  3532.                 )
  3533.  
  3534.                 (if (or (= studio_updatemode @updatemode_add) (= studio_updatemode @updatemode_reinstall))
  3535.  
  3536.                     (
  3537.                         ; set defaults (none in <add> mode, installed components in <update> mode)
  3538.  
  3539.                         (if (= studio_updatemode @updatemode_add)
  3540.  
  3541.                             (
  3542.                                 (set studio_components 0)
  3543.                                 (set studio_starter    0)
  3544.                                 (set studio_manual     0)
  3545.                                 (set studio_addons_a   0)
  3546.                                 (set studio_addons_b   0)
  3547.                                 (set studio_addons_c   0)
  3548.                             )
  3549.                         )
  3550.  
  3551.                         (set studio_components
  3552.  
  3553.                             (askoptions
  3554.  
  3555.                                 (prompt #studio_components_update)
  3556.  
  3557.                                 (choices
  3558.  
  3559.                                     #studio_components_golded
  3560.                                     #studio_components_starter
  3561.                                     #studio_components_docs
  3562.                                     #studio_components_addons
  3563.                                     #studio_components_developer
  3564.                                     #studio_components_screenshot
  3565.                                     #studio_components_recover
  3566.                                 )
  3567.  
  3568.                                 (help #studio_components_help)
  3569.  
  3570.                                 (default studio_components)
  3571.                             )
  3572.                         )
  3573.  
  3574.                         (studio_proc_chooseparts)
  3575.  
  3576.                         (studio_proc_installcomponents)
  3577.  
  3578.                         (studio_proc_checksetup)
  3579.  
  3580.                         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files Demo \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3581.                     )
  3582.                 )
  3583.  
  3584.                 (if (= studio_updatemode @updatemode_remove)
  3585.  
  3586.                     (
  3587.                         (set studio_remove
  3588.  
  3589.                             (askoptions
  3590.  
  3591.                                 (prompt #studio_components_remove)
  3592.  
  3593.                                 (choices
  3594.  
  3595.                                     #studio_components_golded
  3596.                                     #studio_components_starter
  3597.                                     #studio_components_docs
  3598.                                     #studio_components_addons
  3599.                                     #studio_components_developer
  3600.                                     #studio_components_screenshot
  3601.                                     #studio_components_recover
  3602.                                 )
  3603.  
  3604.                                 (help #studio_components_help)
  3605.  
  3606.                                 (default 0)
  3607.                             )
  3608.                         )
  3609.  
  3610.                         (studio_proc_removeparts)
  3611.  
  3612.                         (studio_proc_removecomponents)
  3613.  
  3614.                         (studio_proc_checksetup)
  3615.  
  3616.                         (run "installdata/programs/moveicons <>NIL: grid dir=golded: dx=70 dy=65 columns=4 files Demo \"Drag & Drop\" Recover Licence Uninstall Order Anleitung Manual Screenshot")
  3617.                     )
  3618.                 )
  3619.  
  3620.                 (if (= studio_updatemode @updatemode_presets)
  3621.  
  3622.                     (studio_proc_installpresets)
  3623.                 )
  3624.  
  3625.                 (if (= studio_updatemode @updatemode_registry)
  3626.  
  3627.                     (studio_proc_registry)
  3628.                 )
  3629.  
  3630.                 (if (= studio_updatemode @updatemode_startup)
  3631.  
  3632.                     (studio_proc_startup)
  3633.                 )
  3634.             )
  3635.         )
  3636.     )
  3637. )
  3638.  
  3639. ; ------------------------------------- done -----------------------------------
  3640.  
  3641. (studio_proc_savecfg)
  3642.  
  3643. (studio_proc_cleanup)
  3644.  
  3645. ; set return code
  3646.  
  3647. (delete "env:studioinstall")
  3648.  
  3649. (textfile
  3650.  
  3651.     (dest "env:studioinstall")
  3652.  
  3653.     (append "OK")
  3654. )
  3655.  
  3656. (complete 100)
  3657.  
  3658. (if (= studio_reboot 1)
  3659.  
  3660.     (exit #studio_reboot)
  3661.     (exit)
  3662. )
  3663.  
  3664. (welcome)
  3665.